- 帖子
- 4901
- 主題
- 44
- 精華
- 24
- 積分
- 4916
- 點名
- 142
- 作業系統
- Windows 7
- 軟體版本
- Office 20xx
- 閱讀權限
- 150
- 性別
- 男
- 來自
- 台北
- 註冊時間
- 2010-4-30
- 最後登錄
- 2026-7-16
                
|
本帖最後由 Hsieh 於 2011-1-7 22:20 編輯
回復 1# linshin1999
請善用VBA說明範例
VBA說明檔
Get 陳述式範例
本範例使用 Get 陳述式來將資料從檔案中讀到變數中。範例中假設 TESTFILE 檔案中含有五筆使用者自訂型態的資料記錄。
Type Record ' 定義使用者自訂的資料型態。
ID As Integer
Name As String * 20
End Type
Dim MyRecord As Record, Position ' 宣告變數。
' 以隨機存取的方式來開啟檔案。
Open "TESTFILE" For Random As #1 Len = Len(MyRecord)
' 使用 Get 陳述式來讀取檔案內容。
Position = 3 ' 定義記錄編號。
Get #1, Position, MyRecord ' 將此記錄讀入變數中。
Close #1 ' 關閉檔案。 |
|