以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]多台打印机选择代码  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=162937)

--  作者:老鼠
--  发布时间:2021/4/17 18:32:00
--  [求助]多台打印机选择代码
 以下是我的截图,请各位老师们帮忙解答下。

图片点击可在新窗口打开查看此主题相关图片如下:无标题.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:112.png
图片点击可在新窗口打开查看

以下是我原有的代码,但只能使用默认打印机。不知道如何处理,求各位老师给予帮助。

--  作者:老鼠
--  发布时间:2021/4/17 23:46:00
--  
多浏览论坛内容与问题,终于找到答案,以下是代码:
Dim cmb As WinForm.ComboBox = e.Form.Controls("ComboBox1")
For Each P As String In InstalledPrinters
    cmb.Items.Add (P)
Next