以下是引用狐狸爸爸在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