Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

8066 / 9994

←次へ　｜　前へ→


	【5109】Re:テキストボックスの内容を・・

小僧 - 05/5/26(木) 11:02 -


	引用なし

	パスワード

▼ごろさん：
こんにちは。

>「テキストボックスの内容を一度テーブルに入れてそれをエクスポート」
>で合ってますでしょうか？

テーブルに保存する、という目的がエクスポートの為だけ
（今までの履歴を残すとかであれば別ですが）であれば
必要ないと思われます。

「テキスト内容」というテキストボックスの値を「.txt」の形式で出力する例です。

Private Sub 保存ボタン１_Click()
Dim FSO As Object
Dim Tex As Object
Dim OutPath As String
Dim OutFile As String

　　OutPath = "C:\temp"
　　OutFile = "test.txt"

　　Set FSO = CreateObject("Scripting.FileSystemObject")
　　Set Tex = FSO.CreateTextFile(OutPath & "\" & OutFile)
　　　　Tex.WriteLine Me.テキスト内容
　　　　Tex.Close
　　Set Tex = Nothing
　　Set FSO = Nothing

End Sub

Private Sub 保存ボタン２_Click()
Dim OutPath As String
Dim OutFile As String

　　OutPath = "C:\temp"
　　OutFile = "test.txt"

　　Open OutPath & "\" & OutFile For Output As #2
　　　　Print #2, Me.テキスト内容
　　Close #2
　　
End Sub

170 hits

▼

【5108】テキストボックスの内容を・・ ごろ 05/5/26(木) 10:32