EXCEL VBA 的KEYDOWN事件求助

VBA中有无象批处理一样的按任意键继续功能WScript.Sleep500a.SendKeys"{TAB}"WScript.Sleep500这里加一段用KEYDOWN按任... VBA中有无象批处理一样的 按任意键继续功能
WScript.Sleep 500
a.SendKeys "{TAB}"
WScript.Sleep 500
这里加一段用KEYDOWN按任意键继续的语句
a.SendKeys "{TAB}"
.....
展开
 我来答
帐号已注销
2011-07-29 · TA获得超过8613个赞
知道大有可为答主
回答量:3242
采纳率:66%
帮助的人:2804万
展开全部
可以插入以个文本框,加入下面的语句:

先激活文本框,用来接收按键,文字显示“按任意键继续……”
这时按任意键,都会触发文本框的 KEYDOWN 事件
儒商陈卫华
2011-07-28 · TA获得超过107个赞
知道小有建树答主
回答量:226
采纳率:0%
帮助的人:92.3万
展开全部
在VBA里你可以用弹出对话框来实现, MsgBox "按任意键继续......"
追问
谢谢,这个我已经试过
现在想看看KEYDOWN的效果
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
yunlkong
2011-08-12 · TA获得超过5711个赞
知道大有可为答主
回答量:9695
采纳率:0%
帮助的人:1.9亿
展开全部
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
j_j_x
2011-07-28 · TA获得超过124个赞
知道小有建树答主
回答量:329
采纳率:0%
帮助的人:101万
展开全部
stop
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式