关于打印机,该怎么处理

关于打印机
Private Sub Form_Click()
  Dim W1 As WbemScripting.SWbemLocator
  Dim S As WbemScripting.SWbemServices
  Dim OS As WbemScripting.SWbemObjectSet
  Dim O As WbemScripting.SWbemObject
   
  Set W1 = New WbemScripting.SWbemLocator
  Set S = W1.ConnectServer
  Set OS = S.InstancesOf("Win32_PrintJob")
   
  For Each O In OS
  Me.Print O.GetObjectText_
  Next
   
  Set OS = Nothing
  Set S = Nothing
  Set W1 = Nothing
End Sub

上面代码执行后
结果如下：



请问：
图中各项属性后面的值代表什么意思？？？




[解决办法]
你看那变量名称就知道什么意思了。
比如：第一个是标题，第二个是数据类型，第三个是描述,。。。。。。
[解决办法]
按字面意思翻译过来，基本不差

[解决办法]
标题
数据类型
描述
文档
驱动名称
缩主打印队列
任务ID
任务状态
通知者
所有者
已经打印页数
参数
打印处理器
优先级
文件大小
状态
状态Mask
发送时间？
总页数