Len=記錄長度
中記錄長度是每條記錄的長度。在隨機檔案中,每條記錄的長度應該是相等的。
你的錯誤有兩點,第一點,是檔名。
Open "16.txt" For Random As #8 Len = 2
沒有說明16.txt檔案的路徑。如果有正確的路徑將會執行出錯無“記錄長度不符”什麼的
因為,你沒有說明路徑,將在vb預設路徑(就是你安裝vb的的地方)新建一個16.txt檔案,因為新建檔案是空的,所以讀到的bb值為空。
第二點,len=2是不錯,但你的bb變數卻是一個變長字串(變長字串一般不用於隨機檔案的記錄中),其最少配置len應該為4(參見各變類型別佔用記憶體位元組數)。但你有開啟檔案用了len=2,所以會出錯,說紀錄長度不符。
改正方法:
1、宣告變數時
Dim BB As String * 2
2、開啟檔案時
Open App.Path & "\16.txt" For Random As #8 Len = 2
或者其他正確的路徑
上述程式碼我已經驗證了。
Len=記錄長度
中記錄長度是每條記錄的長度。在隨機檔案中,每條記錄的長度應該是相等的。
你的錯誤有兩點,第一點,是檔名。
Open "16.txt" For Random As #8 Len = 2
沒有說明16.txt檔案的路徑。如果有正確的路徑將會執行出錯無“記錄長度不符”什麼的
因為,你沒有說明路徑,將在vb預設路徑(就是你安裝vb的的地方)新建一個16.txt檔案,因為新建檔案是空的,所以讀到的bb值為空。
第二點,len=2是不錯,但你的bb變數卻是一個變長字串(變長字串一般不用於隨機檔案的記錄中),其最少配置len應該為4(參見各變類型別佔用記憶體位元組數)。但你有開啟檔案用了len=2,所以會出錯,說紀錄長度不符。
改正方法:
1、宣告變數時
Dim BB As String * 2
2、開啟檔案時
Open App.Path & "\16.txt" For Random As #8 Len = 2
或者其他正確的路徑
上述程式碼我已經驗證了。