txtファイルを読み込み csvにも – OpenOffice BASIC 最弱プログラミング

2021年12月7日

txtファイルを読み込み csvにも

Dim fileNo As Integer
Dim lineText As String
fileNo = Freefile

Open "ファイルのパス" For InPut As #fileNo 'ファイルパス絶対パスのみ要注意!!

While not eof(fileNo)

Line Input #fileNo, lineText

MsgBox lineText '読み込んだ内容表示。

Wend

Close #fileNo

その他、OpenOffice BASIC 記事も見ていってくだされ。

https://kanagawa16.sakura.ne.jp/wp/?cat=6