VB如何创建记事本的.TXT文档

VB如何在指定的文件夹中(如D盘的Temp文件夹)创建一个名为abc的记事本的.TXT文档,而且向文档中输入指定TextBox控件中的内容

Dim txtStream As TextStream
Dim fso As FileSystemObject
Set fso = New FileSystemObject
Set txtStream = fso.OpenTextFile(App.Path & "\abc.txt", ForWriting, True)

txtStream.Write text1.text

Open "c:\x.txt" For Output As #1
Print #1, Text1.Text
Close #1

Temp文件夹如果不存在，要先创建。

VB code:

Private Sub Command1_Click()
If Dir("d:\temp") = " " Then MkDir "d:\temp"
Open "d:\temp\abc.txt" For Output As #1
Print #1, Text1.Text
Close #1
End Sub

学习了

1楼正解

Open "d;\temp\abc.txt" For Append As #1
Print #1, Text1.Text
Close #1

append 比 Output 好

引用
append 比 Output 好

不一定啊,要看在什么情况了,

建议楼主去买本VB基础书看看吧，这个问题太小儿科了。
或者装上MSDN

引用
append 比 Output 好

不同场合的用法而已

没有谁比谁好的说法.

给你个折腾点的：

格式：

vb打印问题

Printer.ScaleMode = 6
6表示毫米
Printer.PaperSize = vbPRPSA4

'初始坐标
x = 1
y = 4

'最大的线筐
Printer.DrawStyle = 0
Printer.Line (x, y)-(x + 132.5, y) ......

vb如何调用Illustrator（此前Illustrator未启动）？

请教一下：我用vb写了一个调用Illustrator的测试程序，代码很简单：Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......

vb写的程序编译后,运行若出错,如何知道到在哪一行?

vb写的程序编译后,运行若出错,如何知道到在哪一行?

按Ctrl+F5预编译，出错时会跳转到错误行

不是那样的了,我是要求编译成EXE后运行,提示出错能否提示错在哪一行.

我编译后在我的电脑上运行没问题,但� ......

VB如何联系两个窗体？

就是设计一个计算机模拟考试系统，带有学生和管理员，所以登录窗体和主窗体想分开，登陆学生的显示学生的主窗体，登陆管理员显示管理主窗体，我只会一个窗体用一堆控件，现在享有多个主窗体，不知道怎么做，希望请大 ......