| 发表于:2007-02-22 13:29:108楼 得分:0 |
private declare function postmessage lib "user32 " alias "postmessagea " (byval hwnd as long, byval wmsg as long, byval wparam as long, byval lparam as long) as long private const vk_return = &hd private sub command2_click() dim hdl as long hdl = getforegroundwindow ' hdl is the handle to the foreground window 'appactivate ( "1.txt - 记事本 ") postmessage hdl, vk_return, 0, 0 end sub 我这个什么地方错了? | | |
|