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