Sumulat ng # Pahayag

Nagsusulat ng data sa isang sequential text file na may mga character na nagde-delimiting.

Gamitin Print# statement para mag-print ng data sa isang sequential text file. Gamitin Lagyan ng # pahayag upang magsulat ng data sa isang binary o isang random na file.

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

fileNum : Anumang numeric na expression na naglalaman ng file number na itinakda ng Open statement para sa kaukulang file.

pagpapahayag list: Mga variable o expression na gusto mong ilagay sa isang file, na pinaghihiwalay ng mga kuwit.

Kung ang listahan ng expression ay tinanggal, ang Sumulat Ang pahayag ay nagdaragdag ng isang walang laman na linya sa file.

Upang magdagdag ng isang listahan ng expression sa isang bago o isang umiiral na file, ang file ay dapat buksan sa Output o Idugtong mode.

Ang mga string na iyong isinusulat ay nilagyan ng mga panipi at pinaghihiwalay ng mga kuwit. Hindi mo kailangang ilagay ang mga delimiter na ito sa listahan ng expression.

Ang bawat isa Sumulat Ang pahayag ay naglalabas ng simbolo ng pagtatapos ng linya bilang huling entry.

Ang mga numerong may decimal delimiter ay kino-convert ayon sa mga setting ng lokal.

  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