Question

如何用vb新建一个txt文本文件，将窗口中的内容保存到此txt文件中，并打印出来呢

Answer 1

窗体中有一个CommonDialog控件和一RichTextBox控件。没有的先添加部件。CommonDialog和RichTextBox。
open "c:\test.txt" for output as #1 '\\打开TEST.TXT
Put #1,me.Caption
close #1
RichTextBox1.Visible = False
RichTextBox1.text = me.Caption
'\\下面打印
With CommonDialog1
.DialogTitle = "Print"
.CancelError = True
.Flags = cdlPDReturnDC + cdlPDNoPageNums
If RichTextBox1.text .SelLength = 0 Then
.Flags = .Flags + cdlPDAllPages
Else
.Flags = .Flags + cdlPDSelection
End If
.ShowPrinter
If Err <> MSComDlg.cdlCancel Then
RichTextBox1.text .SelPrint .hDC
End If
End With

Answer 2

open "c:\test.txt" for output as #1 就相当于建立文件了

output就是输出到文本文件
最后close #1