提交回答
  • 至过去的我

    2044人对此回答表示赞同

    我是未来的你,你现在是不是在年找寻小程序答案。你不要感觉诧异,给你来信原因,就是让你不在后悔。今天去学习如何推广小程序,相信......点击查看更多>
    发布于
  • 雪中向日葵

    17人对此回答表示赞同

    这个很好做得,不过不知你这个是要顺序按键,自动按键,手动按键。你的说清楚了。
    可以的话,下个礼拜给你作个。现在电脑不在手上!
    展开
    17
    0回复
    发布于 5年前

    评论(0)

    收起评论

  • Leonardo

    12人对此回答表示赞同

    楼上的不错,写这么多SendKeys 要有毅力的 PF

    这代码应该是没任何问题的
    其实我估计这段代码直接用按键精灵做更好
    用VB实现的话,应该可以精简很多(按具体的需求)
    没必要完全模拟键盘来走,这样一是精度不高,二是写这么长的几乎重复的代码很没意思
    展开
    12
    0回复
    发布于 5年前

    评论(0)

    收起评论

  • Clara33

    5人对此回答表示赞同

    '真长啊 Private Sub Command3_Click() Dim i As Long '单击后等同于如下效果: '1:按键盘的 ALT+TAB(是先按ALT然后不松开ALT按TAB 目的就是为了切换) SendKeys "%{TAB}" '2:按键盘的 TAB(4下) For i = 1 To 4 SendKeys "{TAB}" Next i '3: 按键盘的 1 SendKeys "1" &#
    展开
    5
    0回复
    发布于 5年前

    评论(0)

    收起评论

  • Dylan

    3人对此回答表示赞同

    真的好厉害!
    展开
    3
    0回复
    发布于 5年前

    评论(0)

    收起评论

  • 思念在大脑里裸奔

    3人对此回答表示赞同

    '真长啊
    Private Sub Command3_Click()
    Dim i As Long
    '单击后等同于如下效果:
    '1:按键盘的 ALT+TAB(是先按ALT然后不松开ALT按TAB 目的就是为了切换)
    SendKeys "%{TAB}"
    '2:按键盘的 TAB(4下)
    For i = 1 To 4
    SendKeys "{TAB}"
    N
    展开
    3
    0回复
    发布于 5年前

    评论(0)

    收起评论

  • 编程dogge

    1人对此回答表示赞同

    murphylau误矣!sendkeys可以连发多键!

    '1:按键盘的 ALT+TAB(是先按ALT然后不松开ALT按TAB 目的就是为了切换)
    SendKeys "%{TAB}"
    '2:按键盘的 TAB(4下)
    For i = 1 To 4
    SendKeys "{TAB}"
    Next i
    '3:按键盘的 1
    '4:按键盘的 2
    &
    展开
    1
    0回复
    发布于 5年前

    评论(0)

    收起评论

A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
咨询热线

13312967497

扫码添加业务即可随时咨询 还可领取小程序推广攻略

业务咨询: 13312967497
扫码咨询

扫码咨询套餐

回到顶部