[求助]怎么向弹出的对话框里发送确定命令

tt978501 · 发表于 2011-8-10 16:00:21

本帖最后由 tt978501 于 2011-8-10 16:02 编辑

如图，我用的是天河CAD,命令TZ是图纸设置。
Sub abc()
sendkeys "TZ"
sendkeys "{enter}" '前两步是向命令行输入TZ命令，之后会弹出如图的对话框，接下来该输什么命令（这命令等于对话框的确定）。
End Sub

gulong2001 · 发表于 2011-8-10 16:46:30

使用FindWindow找到对话框窗体句柄
再用EnumChildWindows找到这对话框中确定按钮的句柄
最后SendMessage 发送BM_CLICK消息

tt978501 · 发表于 2011-8-11 07:45:20

本帖最后由 tt978501 于 2011-8-11 07:47 编辑

回复 gulong2001 的帖子

嗯待会试试看

Sub abc()
  sendkeys "TZ"
  sendkeys "{enter}"
  Print
End Sub
我发现直接加个PRINT能直接确认，呵呵，对语言不熟悉啊

账号		自动登录	找回密码
密码			注册

[求助]怎么向弹出的对话框里发送确定命令

本帖子中包含更多资源