以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  HELP》 关于指定打印机  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=117594)

--  作者:terry123e
--  发布时间:2018/4/15 18:48:00
--  HELP》 关于指定打印机
问题一) 想在这裏指定一个打印机,但係都不能!!!  请问在哪一个地方语法错误了?

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
Dim ps As new System.Drawing.Printing.PrinterSettings 
Dim qty As WinForm.TextBox = e.Form.Controls("printqty")

Doc.PrinterName = "HP LaserJet 6L"

ps.Copies = qty.text   \'设置份数
doc.Print(ps)     \'打印

图片点击可在新窗口打开查看此主题相关图片如下:20180415-2.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2018/4/15 18:51:31编辑过]

--  作者:terry123e
--  发布时间:2018/4/15 18:50:00
--  
add
--  作者:有点甜
--  发布时间:2018/4/15 21:27:00
--  
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
Dim ps As new System.Drawing.Printing.PrinterSettings 
Dim qty As WinForm.TextBox = e.Form.Controls("printqty")
ps.PrinterName = "HP LaserJet 6L"
ps.Copies = qty.text   \'设置份数
doc.Print(ps)     \'打印

--  作者:terry123e
--  发布时间:2018/4/15 22:50:00
--  
THANK YOU