以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何获取当前电脑所有打印机到组合框中?我自己操作的只能显示一个!  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=54398)

--  作者:李孝春
--  发布时间:2014/7/27 15:34:00
--  如何获取当前电脑所有打印机到组合框中?我自己操作的只能显示一个!
如何获取当前电脑所有打印机到组合框中?我自己操作的只能显示一个!

图片点击可在新窗口打开查看此主题相关图片如下:打印机.jpg
图片点击可在新窗口打开查看
代码:
Dim 打印机 As WinForm.ComboBox = e.Form.Controls("ComboBox1")
For Each p As String In InstalledPrinters
    打印机.Value= p
Next

--  作者:有点甜
--  发布时间:2014/7/27 15:36:00
--  

Dim 打印机 As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim clist As String = ""
For Each p As String In InstalledPrinters
    clist &= p & "|"
Next

打印机.ComboList = clist.TrimEnd("|")


--  作者:李孝春
--  发布时间:2014/7/27 17:04:00
--  回复:(有点甜)Dim 打印机 As WinForm.ComboBox = e...
谢谢