IBM Lotus Symphony
|
Escreve dados num ficheiro sequencial.
Write [#FileName], [Expressionlist]
FileName: Qualquer expressão numérica que contenha o número de ficheiro definido pela instrução Open para o ficheiro respectivo.
Expressionlist: Variáveis ou expressões que pretenda introduzir num ficheiro, separadas por vírgulas.
Se a lista de expressões for omitida, a instrução Write anexa uma linha em branco ao ficheiro.
Para adicionar uma lista de expressões a um ficheiro novo ou existente, o ficheiro tem de ser aberto no modo Output ou Append.
As cadeias escritas pelo utilizador são delimitadas por aspas e separadas por vírgulas. Não é necessário introduzir estes delimitadores na lista de expressões.
Cada instrução Write produz um símbolo de final de linha como última entrada.
Os números com delimitadores decimais são convertidos consoante as definições de configuração regional.
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 = "New York"
Write #iCount,sValue,300
sValue = "Miami"
Write #iCount,sValue,450
close #iCount
end sub