FileSystem.Write(Int32, Object[]) Método

Referência

Definição

Namespace:: Microsoft.VisualBasic

Assembly:: Microsoft.VisualBasic.Core.dll

Assembly:: Microsoft.VisualBasic.dll

Origem:: FileSystem.vb

Origem:: FileSystem.vb

Origem:: FileSystem.vb

Importante

Algumas informações se referem a produtos de pré-lançamento que podem ser substancialmente modificados antes do lançamento. A Microsoft não oferece garantias, expressas ou implícitas, das informações aqui fornecidas.

Grava dados em um arquivo sequencial. Dados gravados com Write costumam ser lidos a partir de um arquivo usando 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())

Parâmetros

FileNumber: Int32

Obrigatórios. Uma expressão Integer que contém qualquer número de arquivo válido.

Output: Object[]

Opcional. Uma ou mais expressões delimitadas por vírgula para gravar em um arquivo.

Exceções

IOException

O modo de arquivo é inválido.

Exemplos

Este exemplo usa a Write função para gravar dados brutos em um arquivo sequencial.

' 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."

Comentários

As Write funções e WriteLine são fornecidas para compatibilidade com versões anteriores e podem afetar o desempenho. Para aplicativos não herdados, o My.Computer.FileSystem objeto fornece melhor desempenho. Para saber mais informações, confira Acesso a Arquivos com o Visual Basic.

Se você omitir Output, uma linha em branco será impressa no arquivo. Várias expressões podem ser separadas com uma vírgula.

Ao contrário da Print função , a Write função insere vírgulas entre itens e aspas em torno de cadeias de caracteres à medida que são gravadas no arquivo. Você não precisa colocar delimitadores explícitos na lista. Quando Write é usado para gravar dados em um arquivo, há suporte apenas para formatos numéricos, Boolean, data, nulo e Error dados. As seguintes suposições universais são seguidas para que os dados sempre possam ser lidos e interpretados corretamente usando Input, independentemente da localidade:

Os dados numéricos são sempre gravados usando o período como separador decimal.
Para Boolean dados, ou #TRUE##FALSE# é impresso. As True palavras-chave e False não são convertidas, independentemente da localidade.
Os dados de data são gravados no arquivo usando o formato de data universal. Quando o componente de data ou hora está ausente ou zero, apenas a parte fornecida é gravada no arquivo.
Nada será gravado no arquivo se Output os dados estiverem vazios. No entanto, para dados nulos, #NULL# é gravado.
Para Error dados, a saída aparece como #ERROR errorcode#. O Error palavra-chave não é traduzido, independentemente da localidade.

WriteLine insere um caractere de nova linha (ou seja, um retorno de carro/alimentação de linha ou Chr(13) + Chr(10)), depois de ter escrito o caractere final no Output arquivo.

Você pode inserir aspas em uma cadeia de caracteres usando aspas duplas ou "". Por exemplo,

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

retorna uma cadeia de caracteres com o valor de Double quotation marks aren't "difficult" to handle.

Gravar em um arquivo usando as Write funções ou WriteLine requer Append acesso da FileIOPermissionAccess enumeração. Para obter mais informações, consulte FileIOPermissionAccess.

Aplica-se a

Compartilhar via