SendWindowMessage 方法

       

将 Windows 提示信息及相关参数发送到指定的任务中。

expression.SendWindowMessage(Message, wParam, IParam)

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

Message   Long 类型,必需。这是一个对应于要发送的提示信息的十六进制数。如果您有《Microsoft Platform Software Development Kit》,就可以在头文件中查阅提示信息名(例如查阅 Winuser.h 文件),找到相关的十六进制数。这些数均在其数值前冠以 &h。

wParam, lParam   Long 类型,必需。是与要发送的信息相应的参数。有关这些参数代表的意义,请参阅文档中该信息的参考主题,它们包含在《Microsoft Platform Software Developement Kit》中。要检索相应的参数值,需查阅 Spy 工具,该工具也包括在软件开发包中。

示例

如果正在运行“记事本”程序,本示例将通过发送 WM_COMMAND 信息到“记事本”程序来显示“关于”对话框。SendWindowMessage 方法用于发送 WM_COMMAND 信息(111 是 WM_COMMAND 的十六进制值)和参数 11 与 0。Spy 工具用于确定 wParamlParam 的值。

Dim taskLoop As Task

For Each taskLoop In Tasks
    If InStr(taskLoop.Name, "Notepad") > 0 Then
        taskLoop.Activate
        taskLoop.SendWindowMessage &h111, 11, 0
    End If
Next taskLoop