用sendkey执行回车命令应该怎么写? - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 用sendkey执行回车命令应该怎么写?

共有15970人关注过本帖树形打印复制链接主题：用sendkey执行回车命令应该怎么写?

czy

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：6318 积分：33951 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2009/8/29 11:42:00 [显示全部帖子]

以下是引用reachtone在2009-8-29 9:18:00的发言：
在窗口Table的双击事件中，设置以下代码：
If CurrentTable.Current IsNot Nothing Then
Forms("窗口1").Controls("Button3").Select()
Sendkeys.Send("{ENTER}")
End If
其目的是，双击后自动执行按钮（Button3）的事件。
但是，这个代码将焦点移动到按钮上以后，并未执行该按钮上的事件。请问正确的代码应该怎么写？

奇怪，我没发现问题呀。

如果真的不行，可以这样试试：
If CurrentTable.Current IsNot Nothing Then
Sendkeys.Send("{ENTER}")
Forms("窗口1").Controls("Button3").Select()
End If

czy

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：6318 积分：33951 威望：0 精华：10 注册：2008/8/31 20:56:00

Post By：2009/8/29 11:44:00 [显示全部帖子]

或者这样试试：

If CurrentTable.Current IsNot Nothing Then
    Forms("窗口1").Controls("Button3").Select()
    Application.Doevents
    Sendkeys.Send("{ENTER}")
End If

因我测试不出问题，以上都是瞎蒙的。

下一主题 >> << 上一主题

主题：用sendkey执行回车命令应该怎么写?