English Deutsch Français Italiano Español Português 繁體中文 Bahasa Indonesia Tiếng Việt ภาษาไทย
All categories

2006-07-31 20:33:29 · 1 answers · asked by Anonymous in Computers & Internet Software

1 answers

Here's "simplest" code:

Private Sub Command1_Click()
Call SaveText
End Sub

Sub SaveText()
Dim str As String
Dim filename As String

str = "Hello, world"

filename = "c:\test.txt"

Open filename For Append As #1
Print #1, str

Close #1
End Sub

2006-07-31 21:00:21 · answer #1 · answered by VBACCESSpert 5 · 0 0

fedest.com, questions and answers