IBM Lotus Symphony
|
Grava dados em um arquivo sequencial.
Write [#FileName], [Expressionlist]
FileName: Qualquer expressão numérica que contenha o número do arquivo que foi definido pela instrução Open para o respectivo arquivo.
Expressionlist: Variáveis ou expressões que você deseja inserir em um arquivo, separadas por vírgulas.
Se a lista de expressões for omitida, a instrução Write incluirá uma linha vazia no arquivo.
Para adicionar uma lista de expressões a um arquivo novo ou existente, o arquivo deverá ser aberto no modo Output ou Append.
As sequências que você escreve são colocadas entre aspas e separadas por vírgulas. Não é necessário inserir estes delimitadores na lista de expressões.
Cada instrução Write exibe um símbolo de fim da linha como última entrada.
Números com delimitadores decimais são convertidos de acordo com as definições de localidade.
Sub ExampleWrite
Dim iCount As Integer
Dim sValue As String
iCount = Freefile
open "C:\data.txt" for OutPut as iCount
sValue = "Hamburg"
Write #iCount,sValue,200
sValue = "Nova York"
Write #iCount,sValue,300
sValue = "Miami"
Write #iCount,sValue,450
close #iCount
end sub