براي نوشتن فايل دو راه وجود داره:
  • استفاده از دستور Print
  • استفاده از دستور Write

از دستور Print براي نوشتن تويه فايل ترتبي استفاده ميشه.

شكل كلي دستور:


کد:
Print #FileNumber , OutputString

Print: كلمه كليدي جهت نوشتن در فايل ترتيبي


FileNumber: شماره فايل ترتيبي


OutputString: رشته يا عبارتي كه قرار نوشته بشه در فايل ترتيبي


حالا من مي خوام اطلاعات يه TextBox رو در يه متغير به اسم strOutput قرار بدم و سپس در فايل Student.txt اونا رو بريزم:


کد:
 Dim strOutput As String
 Dim FileNumber As Integer
  FileNumber = FreeFile
  Open "C:\Student.txt" For Output As #FileNumber
   strOutput = PassageTxt.Text
    Print #FileNumber, strOutput
  Close #FileNumber

از دستور Write هم ميشه براي نوشتن اطلاعات در يك فايل متني هم استفاده كرد و دقيقاً مثل دستور Print هست با يكسري تفاوت كه فيلدها در دستور Write با كاما (,) از هم جدا ميشن و درون دوتا دبل كوتيشن (" ") و مقادير تاريخ و منطقي درون دوتا علامت شارپ (#) قرار ميگيرن.


کد:
String Value : " Barnamenevis.ORG " 
DateValue : #10/3/1387#
Boolean : #True# OR #False#

شكل كلي دستور:


کد:
Write #FileNumber , OutputString

Write: كلمه كليدي جهت نوشتن در فايل ترتيب


FileNumber: شماره فايل ترتيبي


OutputString: ليست خروجي ها كه قراره در فايل ترتيبي نوشته بشن.