请问如何设定默认的打印机?又或者是打打印前先选择打印机再进行打印?谢谢 http://www.dapha.net这里的方法不行,哪位朋友可以帮帮忙,谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 CommonDialog1.ShowPrinter里面就有选择打印机(OS是2k) Set Printer = Printers(index) '? 打印机:http://support.microsoft.com/default.aspx?scid=kb;EN-US;Q167735 ***************打印机***************************取得打印机:If Printers.Count < 1 Then MsgBox "系统没有安装打印机!", vbCritical, App.Title Unload Me Exit SubEnd IfDim Prns As PrinterFor Each Prns In Printers List1.AddItem Prns.DeviceNameNextList1.ListIndex = 0 现在知道打印名称和有没有打印机了,但我怎样设打印机为默认的打印机呢?另外,有没有办法不设为默认打印机,而是从list中选择一个打印机,然后再打印呢?谢谢 请帮忙看看哪里的问题,谢谢!!! 在VB中怎样将一台打印机设为默认的打印机? Printer.Line 画线 怎么打印不出来? 怎样使TDBGrid的头几列固定不动 在mshflexgrid如何使指定的记录位于看到的记录的最后一个(只有这点分了) 如何得到打开的dos窗口的显示内容? 请问DataGrid控件中用什么方法清除其中的数据呢?谢谢!!!(急) 请问如何在VB中获得本机的ip地址? crystal report问题,帮忙看看! 有谁懂得vb对IE开发的求教下 问一下就结帖,关于查询:) 小问题,解决后马上给分
http://support.microsoft.com/default.aspx?scid=kb;EN-US;Q167735
取得打印机:
If Printers.Count < 1 Then
MsgBox "系统没有安装打印机!", vbCritical, App.Title
Unload Me
Exit Sub
End IfDim Prns As Printer
For Each Prns In Printers
List1.AddItem Prns.DeviceName
Next
List1.ListIndex = 0
另外,有没有办法不设为默认打印机,而是从list中选择一个打印机,然后再打印呢?谢谢