1,216
社区成员
发帖
与我相关
我的任务
分享
Printer.Print "-----------------------------------"
Printer.Print "购买方式:预定"
If Check8.Value = vbChecked Then '会员
Printer.Print "会员编号:" & Text9.Text
End If
Printer.Print "xxx系列:" & Combo5.Text
Printer.Print "xxx品种:" & Combo6.Text
Printer.Print "xxx尺寸:" & Combo7.Text
Printer.Print "金额:" & Text1(51).Text & "元"
Printer.EndDoc
'用printer对象直接写打印代码
printer.currentx=100
printer.currenty=100
printer.print "打印的内容"
printer.enddoc