Instrucción Write#

Escribe datos en un archivo de texto secuencial con caracteres delimitadores.

Use Print# statement to print data to a sequential text file. Use Put# statement to write data to a binary or a random file.

Write [#fileNum] {,|;} expression [, …]

fileNum: Any numeric expression that contains the file number that was set by the Open statement for the respective file.

expression list: Variables or expressions that you want to enter in a file, separated by commas.

Si se omite la lista de expresiones, la instrucción Write añade un renglón vacío al archivo.

Para añadir una lista de expresiones a un archivo nuevo o existente, este debe estar abierto en modo Output o Append.

Las cadenas escritas se entrecomillan y se separan con comas. No necesita poner estos delimitadores en la lista de expresiones.

Cada instrucción Write genera un símbolo de fin de renglón como última entrada.

Los números con delimitadores decimales se convierten de acuerdo a la configuración regional.

Sub ExampleWrite
    Dim iCount As Integer
    Dim sValue As String
    iCount = Freefile
    Open "C:\Users\ThisUser\data.txt" For Output As iCount
    sValue = "Hamburg"
    Write #iCount,sValue,200
    sValue = "New York"
    Write #iCount,sValue,300
    sValue = "Miami"
    Write #iCount,sValue,450
    Close #iCount
End Sub

Sub ExampleWrite
    Dim iCount As Integer
    Dim sValue As String
    iCount = Freefile
    Open "~/data.txt" For Output As iCount
    sValue = "Hamburg"
    Write #iCount,sValue,200
    sValue = "New York"
    Write #iCount,sValue,300
    sValue = "Miami"
    Write #iCount,sValue,450
    Close #iCount
End Sub