在一个二维的ListView中取指定行列的值

''在一个二维的ListView中取指定行列的值
Sub GetSubItem_Example()
'The following example uses the GetSubItem method to retrieve the
'Image Name, PID, CPU, CPU Time, and Mem Usage properties for the
'first five items in the Processes tab of the Windows Task Manager
''dialog box. It then retrieves the same properties for the QTPro.exe
'process, regardless of its position in the process list.
'All of the retrieved properties are written to the test results.

With Dialog("Windows 任务管理器").WinListView("SysListView32")
     For i = 0 To 5
             sSub = "Image Name"
             sReport = sReport + .GetSubItem(i, "映像名称") & vbTab
             sReport = sReport + .GetSubItem(i, "用户名") & vbTab
             sReport = sReport + .GetSubItem(i, "CPU") & vbTab
             sReport = sReport + .GetSubItem(i, "内存使用")
             sReport = sReport + vbCr
        Next

         sReport = sReport + .GetSubItem("QTPro.exe", 0) & vbTab
         sReport = sReport + .GetSubItem("QTPro.exe", 1) & vbTab
         sReport = sReport + .GetSubItem("QTPro.exe", 2) & vbTab
         sReport = sReport + .GetSubItem("QTPro.exe", 3)
         sReport = sReport + vbCr

    End With
    Reporter.ReportEvent micDone, "Task Manager", sReport

End Sub