8,327
社区成员
发帖
与我相关
我的任务
分享
Dim name As String = "Select * from Win32_Printer"
Dim query As ManagementObjectSearcher
Dim queryCollection As ManagementObjectCollection
query = New ManagementObjectSearcher(name)
queryCollection = query.Get()
Dim printdoc As New PrintDocument
Dim printCollection As PrinterSettings.StringCollection = PrinterSettings.InstalledPrinters