Write Statement

Szöveget ír egy szekvenciális fájlba.

Szintaxis:

Write [#Fájlnév], [Kifejezéslista]

Paraméterek:

Fájlnév: Bármilyen numerikus kifejezés, amely tartalmazza a megfelelő fájl Open utasításában megadott fájlszámot.

Kifejezéslista: Változók és kifejezések, amelyeket egy fájlba szeretne beírni vesszőkkel elválasztva.

Ha a kifejezéslista nincs megadva, akkor a Write utasítás egy üres sort fűz a fájlhoz.

Egy kifejezéslista új fájlhoz történő hozzáadásához a fájlt Output vagy Append módban kell megnyitni.

A beírt karakterláncok idézőjelek között vannak, és vesszők választják el őket. A kifejezéslistába nem kell beírni ezeket a határolókat.

Minden Write utasítás kiír egy sorvég jelet utolsó elemként.

A tizedeselválasztót tartalmazó számok konvertálása a területi beállításoktól függ.

PĂ©lda:

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