比如,打开扫雷游戏,点最中间那一格。
解决方案 »
- VB 问一个Adodc的怪问题
- 又有200了啊~~~刚好~~~看我老马的散分大法~~~~哈哈
- SetSystemTime问题
- 在串口通信中,为什么会出现"帧错误"(comFrame)或“中断”(comBreak)的事件?
- Help!!! 如何定义动态二维数组????????
- 怪!怪!帮我看看这是为什么?(在线等待)
- 怎样手工控制msflexgrd的row
- listbox 中怎么传递string类型的数据?ItemData好像只能传数字型的
- 一个奇怪的问题(关于程序运行速度),请高手指点!!!
- 谁有好的EXE资源提取工具!!!
- 兄弟们:~帮忙呀(VB与directx7 编程式)
- 将VB工程中的一个FROM2转为ActiveX,如何实现,请写出详细步骤?
Dim p As POINTAPI
p.X = Int(Text1.Text)
p.Y = Int(Text2.Text)
Dim hwnd1 As Long
hwnd1 = FindWindow("扫雷", "扫雷")
SetCursorPos p.X, p.Y '移动鼠标
SendMessage hwnd1, WM_LBUTTONDOWN, 0, 0 '模拟单击鼠标
SendMessage hwnd1, WM_LBUTTONUP, 0, 0