Tasks 集合对象

多种对象 Tasks Task

该集合对象由 Task 对象组成，这些对象代表当前系统中运行的所有任务。

使用 Tasks 集合

使用 Tasks 属性可返回 Tasks 集合。下列示例确定 Microsoft Excel 是否正在运行。如果是，将切换至该程序并将其最大化；否则将启动该程序。

If Tasks.Exists("Microsoft Excel") = True Then
    Tasks("Microsoft Excel").Activate
    Tasks("Microsoft Excel").WindowState = wdWindowStateMaximize
Else
    Shell "C:\Program Files\" & _
        "Microsoft Office\Office10\Excel.exe"
End If

使用 Visual Basic 的 Shell 函数运行一个可执行程序并将该程序添至 Tasks 集合。

使用 Tasks(index) 可返回单独的 Task 对象，其中 index 为应用程序名称或索引序号。下列示例打开 Tasks 集合中第一个可视任务的应用程序窗口并调整其尺寸。

With Tasks(1)
    If .Visible = True Then
        .Activate
        .Width = 400
        .Height = 200
    End If
End With

如果“计算器”应用程序在 Tasks 集合中，则下列示例恢复该应用程序窗口。

If Tasks.Exists("Calculator") = True Then
    Tasks("Calculator").WindowState = wdWindowStateNormal
End If