vb运行出来的结果怎么全部复制到记事本上去啊

就像fortran那样能有一个dat格式的输出文件

第1个回答  2008-05-29
?
问题没有怎么讲清楚,你补充一下。

你的vb程序是不是控制台程序,就是在dos下(黑色界面下)运行的?
如果是的话,点开始,键入cmd回车,用dos命令运行你的程序,并用转向输出命令输出结果到txt文本中就行了。比如你的vb程序为aa.exe,放在d:\program\下,你要把结果输出到d盘根目录下的out.txt文件中去,你可以在dos下先转到这个目录下(这个你会吧),再键入:

aa.exe > d:\out.txt
回车就行了。

如果不是控制台程序,你讲清楚你的问题。
第2个回答  2008-05-29
楼主,你能吧任何东东写入文件,比如写入aaa.txt

Open "aaa.txt" For Output As #1
Print #1, “这里填你想写入的任何数字、字符、常量或变量”
Close #1

OK?
第3个回答  2008-05-29
输出:
Open "*.txt" For Output As #1

Print #1, text1.Text

Close #1

读取:
Open App.Path + "\*.txt" For Input As #1
Do While Not EOF(1)
Input #1, text1.Text
Loop
Close #1
第4个回答  2008-05-29
Print # 语句示例
本示例使用 Print # 语句将数据写入一个文件。

Open "TESTFILE" For Output As #1 ' 打开输出文件。
Print #1, "This is a test" ' 将文本数据写入文件。
Print #1, ' 将空白行写入文件。
Print #1, "Zone 1"; Tab ; "Zone 2" ' 数据写入两个区(print zones)。
Print #1, "Hello" ; " " ; "World" ' 以空格隔开两个字符串。
Print #1, Spc(5) ; "5 leading spaces " ' 在字符串之前写入五个空格。
Print #1, Tab(10) ; "Hello" ' 将数据写在第十列。

' 赋值 Boolean、Date、Null 及 Error 等。
Dim MyBool, MyDate, MyNull, MyError
MyBool = False : MyDate = #February 12, 1969# : MyNull = Null
MyError = CVErr(32767)
' True、False、Null 及 Error 会根据系统的地区设置自动转换格式。
' 日期将以标准的短式日期的格式显示。
Print #1, MyBool ; " is a Boolean value"
Print #1, MyDate ; " is a date"
Print #1, MyNull ; " is a null value"
Print #1, MyError ; " is an error value"
Close #1 ' 关闭文件。本回答被提问者采纳