(OpenOffice Basic)テキストファイルの書き込み

OpenOffice Basicを使ってのテキストファイルへのデータ出力方法です。

サンプルそのままですが、この辺はVBAと対して変わらないようですね。

Dim FileNo As Integer
Dim CurrentLine As String
Dim Filename As String

Filename = "c:\data.txt"              ' ファイル名
FileNo = Freefile               ' ファイルハンドル作成

Open Filename For Output As #FileNo         ' ファイルを書き込みモードで開く
Print #FileNo, "This is a line of text"      ' 1レコード書き出し
Print #FileNo, "This is another line of text"   ' 1レコード書き出し
Close #FileNo                  ' ファイルを閉じる

参考:

ファイルおよびディレクトリ (OpenOffice.org 実行時ライブラリ) - OpenOffice.org Wiki: