Tasks 属性

       

该属性返回一个 Tasks 集合,该集合代表所有正在运行的应用程序。

expression.Tasks

expression   必需。该表达式返回一个 Application 对象。

说明

有关返回集合中单独成员的信息,请参阅返回集合中的对象

示例

本示例显示计算器。如果计算器还没有运行,则 Word 启动该任务,然后显示计算器。

If Tasks.Exists("Calculator") Then
    With Tasks("Calculator")
        .Activate
        .WindowState = wdWindowStateNormal
    End With
Else
    Shell "calc.exe"
    Tasks("Calculator").WindowState = wdWindowStateNormal
End If

本示例查看 Microsoft Excel 是否正在运行。如果该任务正在运行,则本示例激活 Microsoft Excel;否则将显示一个消息框。

If Tasks.Exists("Microsoft Excel") = True Then
    With Tasks("Microsoft Excel")
        .Activate
        .WindowState = wdWindowStateMaximize
    End With
Else
    Msgbox "Microsoft Excel is not currently running."
End If