VB中form1窗口上有text1和label1等控件,如何将form1中的内容从打印机里打印出来?

2025-01-01 03:08:53
推荐回答(2个)
回答1:

'假设C盘有个a.txt文件 示例代码如下:
Private Sub Form_Click()
Open "c:\a.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, b
Label1.Caption = Label1.Caption b
Loop
Close #1
End Sub

回答2:

Me.PrintForm
加上就可以了!试试吧!