.
參考答案:问题可以这样的解决:
你可以使用vb的printers集合对象。
Private Sub Command1_Click()
Dim i As Integer
For i = 0 To Printers.Count - 1
Print Printers(i).DeviceName‘打印机的名称
Print Printers(i).DriverName ’打印机的驱动名称
Print Printers(i).Port‘端口
Next
End Sub
笑话军事旅游美容女性百态母婴家电游戏互联网财经美女干货家饰健康探索资源娱乐学院 数码美食景区养生手机购车首饰美妆装修情感篇厨房科普动物植物编程百科知道汽车珠宝 健康评测品位娱乐居家情感星座服饰美体奢侈品美容达人亲子图库折扣生活美食花嫁风景 | 首页 |
.
參考答案:问题可以这样的解决:
你可以使用vb的printers集合对象。
Private Sub Command1_Click()
Dim i As Integer
For i = 0 To Printers.Count - 1
Print Printers(i).DeviceName‘打印机的名称
Print Printers(i).DriverName ’打印机的驱动名称
Print Printers(i).Port‘端口
Next
End Sub