トップ 一覧 ping 検索 ヘルプ 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