براي نوشتن فايل دو راه وجود داره:
- استفاده از دستور Print
- استفاده از دستور Write
دستور Print:
از دستور 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:
از دستور Write هم ميشه براي نوشتن اطلاعات در يك فايل متني هم استفاده كرد و دقيقاً مثل دستور Print هست با يكسري تفاوت كه فيلدها در دستور Write با كاما (,) از هم جدا ميشن و درون دوتا دبل كوتيشن (" ") و مقادير تاريخ و منطقي درون دوتا علامت شارپ (#) قرار ميگيرن.
کد:
String Value : " Barnamenevis.ORG "
DateValue : #10/3/1387#
Boolean : #True# OR #False#
شكل كلي دستور:
کد:
Write #FileNumber , OutputString
Write: كلمه كليدي جهت نوشتن در فايل ترتيب
FileNumber: شماره فايل ترتيبي
OutputString: ليست خروجي ها كه قراره در فايل ترتيبي نوشته بشن.
