请问VB打印问题
我现在遇到一个问题
就是我的工程是MDI的
现在想在主窗体点击Toolbar上的第5个按钮来实现打印功能,此处需要打印的是一个子窗体Tubiao.frm中的内容
现在求高手帮我写这段程序,不要用tubiao.printForm,因为我需要设定一下打印机,希望横向打印
谢谢了!!!!!!
参考答案:Printer.Height = 10 * 567
Printer.Width = 5 * 567
Printer.ScaleWidth = 210
Printer.ScaleHeight = 297
Printer.ScaleMode = 6 '设置打印的单位
Printer.PaperSize = vbPRPSA4 '定义纸张大小为A4
Printer.Orientation = vbPRORLandscape '横向打印
Printer.ScaleLeft = -0.75 * 1440
Printer.ScaleTop = -0.5 * 1440
Printer.CurrentX = 0
Printer.CurrentY = 0
PrintForm
Printer.EndDoc '(如无此句则打印机不工作)
Printer.NewPage '(无此句打印机不换页)
Printer.KillDoc '(无此句不能断开计算机和打印机的连接)
前面是打印设置的,注意PrintForm
应该可以了吧