12,673
回編集
差分
ナビゲーションに移動
検索に移動
ページの作成:「==VB ファイルを読む== const IN_FILE_NAME as String="c:test.txt" Dim fn As Integer Dim line As String fn = FreeFile Open IN_FILE_NAME For Input As…」
==VB ファイルを読む==
const IN_FILE_NAME as String="c:test.txt"
Dim fn As Integer
Dim line As String
fn = FreeFile
Open IN_FILE_NAME For Input As #fn
Do While Not EOF(fn)
Line Input #fn, line
Debug.Print line
Loop
Close #fn
const IN_FILE_NAME as String="c:test.txt"
Dim fn As Integer
Dim line As String
fn = FreeFile
Open IN_FILE_NAME For Input As #fn
Do While Not EOF(fn)
Line Input #fn, line
Debug.Print line
Loop
Close #fn
© 2006 矢木浩人
