zoukankan      html  css  js  c++  java
  • VB之SendKeys键盘模拟

    VB SendKeys语句详解




    大家在VB6中都用过sendkeys,幕通过发送键盘的事件间接地控制外部程序,是有遥控之说。
    我在VB7中却发现这个不能用了, 也就不了了之,
    后来一次在查阅MSDN的时候竟看到了这个,是以尝试了一下,竟然旧貌新颜,还是一样好用。

    主要是在system.winforms族中找到sendkeys 使用方法同VB6
    键:一般的字符键如下输入”A” “B” “C”………………”Z”等,如果要连续按下两个以上就使用”AB”的形式
    如果同时按下AB就使用括号如”(AB)”

    如果是功能键,就放到大括号中如“{F4}” 另:用+代表Shift,用^代表Ctrl,用%代表Alt

    如“+A”表示按下Shift同时按A

    下面是一个例子:

    Dim sdstr As System.WinForms.SendKeys

    sdstr.Send("%{F4}") 发送ALT+F4

    下面这个代码在按下Button2以后转移焦点到下一个控件,

    使按钮能按下又不能按受焦点.

    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs)

    Dim sdstr As System.WinForms.SendKeys

    sdstr.Send("{TAB}")

    End Sub

    下面使用SendWait,使用的方法同上,不过执行这个过程会等待到发送的键执行完成以后,再继续执行后面的代码.

    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs)

    Dim sdstr As System.WinForms.SendKeys

    'sdstr.Send("{TAB}")

    sdstr.SendWait("{TAB}")

    End Sub

    VB.NET中使用shell调用外部程序:

    Shell(pathname as string,[style as microsoft.visualbasic.appwinstyle=2],[wait as boolean=false],[timeout as integer=-1]) as integer

    调用资源管理器

    Dim PID As Integer
    PID = Shell("explorer.exe http://vbnetcn.126.com", Microsoft.VisualBasic.AppWinStyle.NormalFocus, True)

    调用默认程序

    Dim PID As Integer
    PID = Shell("start.exe mailto:vbnetcn@163.com", Microsoft.VisualBasic.AppWinStyle.Hide, True)

    使用Microsoft.VisualBasic.AppWinStyle.Hide参数是为了隐藏程序运行时跳出的DOS窗口。


    SendKeys是将一个或多个按键消息发送到活动窗口,就如同在键盘上进行输入一样,简单说就是模拟按键
    看例子
    Dim ReturnValue, I
    ReturnValue = Shell("Calc.EXE", 1) ' 运行计算器。
    AppActivate ReturnValue ' 激活计算器。
    For I = 1 To 100 ' 设置计数循环。
    SendKeys I & "{+}", True ' 按下按键给计算器
    Next I ' 将所有 I 值相加。
    SendKeys "=", True ' 取得总合。
    msgbox "看结果吧"
    SendKeys "%{F4}", True ' 按 ALT+F4 关闭计算器。


    如果觉得太难你看这个例子简单了吧
    将TIMER1控件的INTERVAL设置为1000
    Private Sub Timer1_Timer()
    Text1.SetFocus
    SendKeys "a"
    End Sub


    再来理解SendKeys "{Home}+{End}"你看看会有什么结果
    用这个例子
    Private Sub Timer1_Timer()
    Text1.SetFocus
    SendKeys "{Home}+{End}"
    End Sub
    会发现TEXT1中的文字全选了


    [结论]
    SendKeys很方便,但千万要慎重使用,这是一柄双刃剑,使用不当会伤害自己。

    [下面是msdn的中文帮助]
    SendKeys语句 返回索引

    将一个或多个按键消息发送到活动窗口,就如同在键盘上进行输入一样。

    语法

    SendKeys string[, wait]

    SendKeys 语句的语法具有以下几个命名参数:

    部分 描述
    string 必需的。字符串表达式,指定要发送的按键消息。
    Wait 可选的。指定等待方式的 BooleandefBooleanDataType@veendf98.chm 值。如果为 False(缺省值),则控件在按键发送出去之后立刻返回到过程。如果为 True,则按键消息必须在控件返回到过程之前加以处理。


    说明

    每个按键由一个或多个字符表示。为了指定单一键盘字符,必须按字符本身的键。例如,为了表示字母 A,可以用 "A" 作为 string。为了表示多个字符,就必须在字符后面直接加上另一个字符。例如,要表示 A、B 及 C,可用 "ABC" 作为 string。

    对 SendKeys 来说,加号 (+)、插入符 (^)、百分比符号 (%)、上划线 (~) 及圆括号 ( ) 都具有特殊意义。为了指定上述任何一个字符,要将它放在大括号 ({}) 当中。例如,要指定正号,可用 {+} 表示。方括号 ([ ]) 对 SendKeys 来说并不具有特殊意义,但必须将它们放在大括号中。在其它应用程序中,方括号有特殊意义,在出现动态数据交换 (DDE) 的时候,它可能具有重要意义。为了指定大括号字符,请使用 {{} 及 {}}。

    为了在按下按键时指定那些不显示的字符,例如 ENTER 或 TAB 以及那些表示动作而非字符的按键,请使用下列代码:

    按键 代码
    BACKSPACE {BACKSPACE}, {BS}, 或 {BKSP}
    BREAK {BREAK}
    CAPS LOCK {CAPSLOCK}
    DEL or DELETE {DELETE} 或 {DEL}
    DOWN ARROW {DOWN}
    END {END}
    ENTER {ENTER}或 ~
    ESC {ESC}
    HELP {HELP}
    HOME {HOME}
    INS or INSERT {INSERT} 或 {INS}
    LEFT ARROW {LEFT}
    NUM LOCK {NUMLOCK}
    PAGE DOWN {PGDN}
    PAGE UP {PGUP}
    PRINT SCREEN {PRTSC}
    RIGHT ARROW {RIGHT}
    SCROLL LOCK {SCROLLLOCK}
    TAB {TAB}
    UP ARROW {UP}
    F1 {F1}
    F2 {F2}
    F3 {F3}
    F4 {F4}
    F5 {F5}
    F6 {F6}
    F7 {F7}
    F8 {F8}
    F9 {F9}
    F10 {F10}
    F11 {F11}
    F12 {F12}
    F13 {F13}
    F14 {F14}
    F15 {F15}
    F16 {F16}


    为了指定那些与 SHIFT、CTRL 及 ALT 等按键结合的组合键,可在这些按键码的前面放置一个或多个代码,这些代码列举如下:

    按键 代码
    SHIFT +
    CTRL ^
    ALT %


    为了说明在按下其它按键时应同时按下 SHIFT、CTRL、及 ALT 的任意组合键,请把那些按键的码放在括号当中。例如,为了说明按下 E 与 C 的时候同时按下 SHIFT 键,请使用 "+(EC)"。为了说明在按下 E 的时候同时按下 SHIFT 键,但接着按 C 而不按 SHIFT,则使用 "+EC"。

    为了指定重复键,使用 {key number} 的形式。必须在 key 与 number 之间放置一个空格。例如,{LEFT 42} 意指 42 次按下 LEFT ARROW 键;{h 10} 则是指 10 次按下 H 键。

    注意 不能用 SendKeys 将按键消息发送到这样一个应用程序,这个应用程序并没有被设计成在 Microsoft Windows 中运行。Sendkeys 也无法将 PRINT SCREEN 按键 {PRTSC} 发送到任何应用程序


    将一个或多个按键消息发送到活动窗口,就如同在键盘上进行输入一样。

    语法

    SendKeys string[, wait]

    SendKeys 语句的语法具有以下几个命名参数:

    string 必需的。字符串表达式,指定要发送的按键消息。

    Wait 可选的。指定等待方式的 BooleandefBooleanDataType@veendf98.chm 值。如果为 False(缺省值),则控件在按键发送出去之后立刻返回到过程。如果为 True,则按键消息必须在控件返回到过程之前加以处理。

    说明

    每个按键由一个或多个字符表示。为了指定单一键盘字符,必须按字符本身的键。例如,为了表示字母 A,可以用 "A" 作为 string。为了表示多个字符,就必须在字符后面直接加上另一个字符。例如,要表示 A、B 及 C,可用 "ABC" 作为 string。

    对 SendKeys 来说,加号 (+)、插入符 (^)、百分比符号 (%)、上划线 (~) 及圆括号 ( ) 都具有特殊意义。为了指定上述任何一个字符,要将它放在大括号 ({}) 当中。例如,要指定正号,可用 {+} 表示。方括号 ([ ]) 对 SendKeys 来说并不具有特殊意义,但必须将它们放在大括号中。在其它应用程序中,方括号有特殊意义,在出现动态数据交换 (DDE) 的时候,它可能具有重要意义。为了指定大括号字符,请使用 {{} 及 {}}。

    为了在按下按键时指定那些不显示的字符,例如 ENTER 或 TAB 以及那些表示动作而非字符的按键


    为了说明在按下其它按键时应同时按下 SHIFT、CTRL、及 ALT 的任意组合键,请把那些按键的码放在括号当中。例如,为了说明按下 E 与 C 的时候同时按下 SHIFT 键,请使用 "+(EC)"。为了说明在按下 E 的时候同时按下 SHIFT 键,但接着按 C 而不按 SHIFT,则使用 "+EC"。

    为了指定重复键,使用 {key number} 的形式。必须在 key 与 number 之间放置一个空格。例如,{LEFT 42} 意指 42 次按下 LEFT ARROW 键;{h 10} 则是指 10 次按下 H 键。

    注意 不能用 SendKeys 将按键消息发送到这样一个应用程序,这个应用程序并没有被设计成在 Microsoft Windows 中运行。Sendkeys 也无法将 PRINT SCREEN 按键 {PRTSC} 发送到任何应用程序

  • 相关阅读:
    纪中第三天
    纪中第一天
    图片验证码的实现
    使用监听器解决路径问题
    log4j测试示例
    redis示例
    kafka示例
    CSRF verification failed. Request aborted.
    TemplateDoesNotExist
    创建 django 项目命令
  • 原文地址:https://www.cnblogs.com/samlin/p/1406040.html
Copyright © 2011-2022 走看看