77084visualbasic程式設(shè)計(jì)-全文預(yù)覽
【正文】 Name As String * 10 Age As Integer Id As Integer End Type Private Sub form_click() Dim rec As UserRecord Dim i As Integer = jlhuang = 24 程式還沒(méi)完 由 1開(kāi)始數(shù) 預(yù)設(shè)值為 1 每寫一次加 1 24 寫入檔案 (隨機(jī)存取 ) = 1122 Print LenB(rec) Open c:\test For Random Access Write _ As 1 Len = LenB(rec) For i = 1 To 10 Put 1, , rec = + 1 = + 1 Next i Close 1 End Sub 25 讀取檔案 (隨機(jī)存取 ) Get []檔案代碼 ,[位置 ],變數(shù)名 ? Get 1, 10,MyAge Seek []檔案代碼 ,位置 ? Seek 1, 20 26 讀取檔案 (隨機(jī)存取 ) Private Sub form_click() Cls Dim rec As UserRecord Dim i As Integer Open c:\test For Random Access Read _ As 1 Len = LenB(rec) Do Get 1, , rec Print , , Loop Until EOF(1) Close 1 End Sub 若回傳 true， 表示到檔尾 27 寫入檔案 (循序存取 ) Print []檔案代碼 , [output list] Print 1, “Hello World” Print 1, “Hello”。Visual Basic 程式設(shè)計(jì) 講師：戴志華 國(guó)立臺(tái)灣大學(xué)電機(jī)工程研究所 第十二章 檔案存取 3 Drive AvailableSpace 可用空間大小 (bytes) DriveLetter 磁碟機(jī)代碼 DriveTyp
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1