Turinys

# Write# sakinys

Rašo duomenis į nuoseklųjį tekstinį failą su skiriamaisiais simboliais.

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

### Sintaksė:

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

### Parametrai:

fileNum: bet kuri skaitinė išraiška, kurioje yra failo numeris, kurį nustatė atitinkamo failo atvėrimo sakinys.

reiškinių sąrašas: Kintamieji ar reiškiniai, kuriuos norite įvesti į failą, atskirtus kableliais.

Jei reiškinių sąrašas praleistas, sakinys Rašyti prie failo prideda tuščią eilutę.

Norėdami pridėti reiškinių sąrašą prie naujo ar esamo failo, failas turi būti atvertas naudojant vieną iš veiksenų Atverti arba Pridėti.

Jūsų rašomos eilutės yra kabutėse ir atskirtos kableliais. Šių skirtukų nereikia įvesti į reiškinių sąrašą.

Kiekvienas sakinys Write pateikia eilutės pabaigos simbolį paskutiniu įrašu.

Skaičiai su dešimtainiais skyrikliais konvertuojami pagal lokalės nustatymus.

### Pavyzdys:

      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

Susijusios temos

Atvertas sakinys

Print# sakinys

Put# sakinys

Uždarymo sakinys

Paremkite mus!