Word VBA教程: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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号