| ページ一覧 | ブログ | twitter |  書式 | 書式(表) |

MyMemoWiki

VB ファイルを読む

提供: MyMemoWiki
2020年2月16日 (日) 04:33時点におけるPiroto (トーク | 投稿記録)による版
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
ナビゲーションに移動 検索に移動

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