Sdílet prostřednictvím


FileSystem.Write(Int32, Object[]) Metoda

Definice

Zapisuje data do sekvenčního souboru. Data zapsaná pomocí Write se obvykle čtou ze souboru pomocí Input.

public:
 static void Write(int FileNumber, ... cli::array <System::Object ^> ^ Output);
public static void Write (int FileNumber, params object[] Output);
static member Write : int * obj[] -> unit
Public Sub Write (FileNumber As Integer, ParamArray Output As Object())

Parametry

FileNumber
Int32

Povinná hodnota. Výraz Integer , který obsahuje jakékoli platné číslo souboru.

Output
Object[]

Nepovinný parametr. Jeden nebo více výrazů oddělených čárkami pro zápis do souboru

Výjimky

Režim souboru je neplatný.

Příklady

Tento příklad používá funkci k zápisu Write nezpracovaných dat do sekvenčního souboru.

' Open file for output.
FileOpen(1, "TestFile.txt", OpenMode.Output)
' Print text to the file. The quotation marks will be in the display.
Write(1, "This is a test.")
' Go to the next line.
WriteLine(1)
' Skip a line.
WriteLine(1)
' Print in two print zones. You will see commas and quotation marks
' in the output file.
WriteLine(1, "Zone 1", SPC(10), "Zone 2")
' Build a longer string before calling WriteLine.
WriteLine(1, "Hello" & "  " & "World")
' Include five leading spaces.
WriteLine(1, SPC(5), "Leading spaces")
' Print a word starting at column 10.
WriteLine(1, TAB(10), "Hello")

' Assign Boolean and Date values.
Dim aBool As Boolean
Dim aDate As DateTime
aBool = False
aDate = DateTime.Parse("February 12, 1969")

' Dates and Booleans are translated using locale settings of 
' your system.
WriteLine(1, aBool & " is a Boolean value.")
WriteLine(1, aDate & " is a date.")
' Close the file.
FileClose(1)

' Contents of TestFile.txt
'"This is a test.",
'
'"Zone 1",          "Zone 2"
'"Hello  World"
'     "Leading spaces"
'         ,"Hello"
'"False is a Boolean value."
'"2/12/1969 is a date."

Poznámky

Funkce Write a WriteLine jsou poskytovány pro zpětnou kompatibilitu a mohou ovlivnit výkon. U jiných než starších aplikací My.Computer.FileSystem poskytuje objekt lepší výkon. Další informace najdete v tématu Přístup k souborům pomocí jazyka Visual Basic.

Pokud tento parametr vynecháte Output, vytiskne se do souboru prázdný řádek. Více výrazů lze oddělit čárkou.

Print Na rozdíl od funkce Write vkládá funkce čárky mezi položky a uvozovky kolem řetězců, které se zapisují do souboru. Do seznamu není nutné vkládat explicitní oddělovače. Pokud Write se používá k zápisu dat do souboru, podporují se pouze číselné Booleanformáty , datum, hodnota null a Error datové formáty. Dodržují se následující univerzální předpoklady, aby bylo možné data vždy číst a správně interpretovat pomocí , Inputbez ohledu na národní prostředí:

  • Číselná data se vždy zapisuje pomocí tečky jako oddělovače desetinných míst.

  • U Boolean dat se vytiskne buď #TRUE# , nebo #FALSE# . Klíčová True slova a False se nepřekládají bez ohledu na národní prostředí.

  • Data data jsou do souboru zapsána pomocí univerzálního formátu data. Chybí-li nebo je-li nulová komponenta data nebo času, je do souboru zapsána pouze část, jež je zadána.

  • Pokud Output jsou data prázdná, nic se do souboru nepíše. Pro data #NULL# s hodnotou null se však zapíše.

  • U Error dat se výstup zobrazí jako #ERROR errorcode#. Klíčové Error slovo se nepřeloží bez ohledu na národní prostředí.

WriteLine vloží znak nového řádku (tj. návrat na začátek řádku/ odřádkování nebo Chr(13) + Chr(10)), jakmile do souboru zapíše poslední znak Output .

Do řetězce můžete vložit uvozovky pomocí dvojitých uvozovek. Třeba

Dim x As String = "Double quotation marks aren't ""difficult"" to handle."

vrátí řetězec s hodnotou Double quotation marks aren't "difficult" to handle.

Zápis do souboru pomocí Write funkcí nebo WriteLine vyžaduje Append přístup z výčtu FileIOPermissionAccess . Další informace najdete v tématu FileIOPermissionAccess .

Platí pro

Viz také