如题所述
第1个回答 2013-09-18
要用到API函数 发送消息
代码:
.版本2
.DLL命令 发送消息_, 整数型, "user32", "SendMessageA", , 调用一个窗口的窗口函数,将一条消息发给那个窗口。除非消息处理完毕,否则该函数不会返回。SendMessageBynum, ; SendMessageByString是该函数的“类型安全”声明形式 由具体的消息决定
.参数 窗口句柄, 整数型, , 要接收消息的那个窗口的句柄
.参数 信息值, 整数型, , 消息的标识符
.参数 参数一, 逻辑型, , 具体取决于消息
.参数 参数二, 整数型, , 具体取决于消息;
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
发送消息_ (你取到的编辑框的句柄, 键代码, 真, 0)追问
代码:
.版本2
.DLL命令 发送消息_, 整数型, "user32", "SendMessageA", , 调用一个窗口的窗口函数,将一条消息发给那个窗口。除非消息处理完毕,否则该函数不会返回。SendMessageBynum, ; SendMessageByString是该函数的“类型安全”声明形式 由具体的消息决定
.参数 窗口句柄, 整数型, , 要接收消息的那个窗口的句柄
.参数 信息值, 整数型, , 消息的标识符
.参数 参数一, 逻辑型, , 具体取决于消息
.参数 参数二, 整数型, , 具体取决于消息;
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
发送消息_ (你取到的编辑框的句柄, 键代码, 真, 0)追问
.局部变量 hWnd, 整数型, , , 窗口句柄变量
hWnd = FindWindow(“TLoginForm”,“ ”) '//窗口标题可换成“字符(0)”相当于NULL
hWnd = GetWindow (hWnd, #GW_CHILD)
返回 (hWnd)
.常量 GW_CHILD, "5", , 查找子窗口
.常量 GW_HWNDNEXT, "2", , 查找下一窗口
用函数
.版本2
.DLL命令 模拟鼠标_, , "user32.dll", "mouse_event", , mouse_event,模拟一次鼠标事件
.参数 标志组合, 整数型, , dwFlags,一系列标志的组合
.参数 水平方向, 整数型, , dx,参见相关帮助
.参数 垂直方向, 整数型, , dy,参见相关帮助
.参数 数据信息, 整数型, , cButtons,未使用
.参数 扩展数据信息, 整数型, , dwExtraInfo,通常未用的一个值
.版本 2
模拟鼠标_ (到数值 (“MOUSEEVENTF_LEFTDOWN=&H2”), 按钮的水平方向, 按钮的垂直方向)
模拟鼠标_ (到数值 (“MOUSEEVENTF_LEFTUP”), 按钮的水平方向, 按钮的垂直方向)
不知道是不是这样子 如果成功了 不要忘记采纳