Foxtable(狐表)用户栏目专家坐堂 → 选择打印机


  共有13282人关注过本帖树形打印复制链接

主题:选择打印机

帅哥哟,离线,有人找我吗?
baoxyang
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3313 积分:23134 威望:0 精华:1 注册:2009/3/31 11:25:00
  发帖心情 Post By:2010/7/19 14:37:00 [显示全部帖子]

以下是引用狐狸爸爸在2010-7-19 12:46:00的发言:
InstalledPrinters
返回一个字符串集合,包括所有已经安装的打印机的名称。
示例
在命令窗口执行下面的代码,可以列出所有已经安装的打印机名称:
For Each p As String in InstalledPrinters
    Output.Show(p)
Next

 狐狸爸爸,已经告诉你了呀,销做些修改。

dim s as string = ""

For Each p As String in InstalledPrinters
    s = s & p & "|"

Next

s = s.trimEnd("|","")

Dim cmb As WinForm.ComboBox
cmb = Forms(
"窗口1").Controls("ComboBox1")
cmb.ComboList =
s


 


 回到顶部