SendMessage无法正常工作

时间:2017-01-06 08:01:15

标签: vb6 sendmessage

我正在尝试自动化登录过程。我需要传递2次tab和一个keydown(用于下拉)并输入事件以便登录。我使用下面的代码

 parenthwnd = FindWindow1(vbNullString, "APPName")
  retvalue = SendMessage(parenthwnd, WM_KEYDOWN, VK_TAB, 0)
  retvalue = SendMessage(parenthwnd, WM_KEYDOWN, VK_TAB, 0)     
  retvalue = SendMessage(parenthwnd, WM_KEYDOWN, VK_DOWN, 0)
  retvalue = SendMessage(parenthwnd, WM_KEYUP, VK_DOWN, 0)
  retvalue = PostMessage(parenthwnd, BM_CLICK, 0, 0)

标签事件正在运行。我无法获得keydown并输入活动。 有什么我想念的。

0 个答案:

没有答案