Private Sub Command2_Click()
Print first
Open "f:\123456.doc" For Output As #1Print #1, "---------------------- "For X = 0 To 36Print #1, Label3(X).Captionnext X
end sub
以上代码可以实现在123456.doc中竖排打印 Label3(X).Caption中内容如:
1
2
3
4
5
6
7
8
9
请问如何才能使其横排打印
如:
1 2 3 4 5 6 7 8 9谢谢!