トップ 差分 一覧 ping ソース 検索 ヘルプ PDF RSS ログイン

VB ファイルを読む



目次



記事一覧

キーワード

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



YAGI Hiroto (piroto@a-net.email.ne.jp)
twitter http://twitter.com/pppiroto

Copyright© 矢木 浩人 All Rights Reserved.