51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 4119|回复: 4
打印 上一主题 下一主题

[原创] QTP 模拟小键盘操作

[复制链接]

该用户从未签到

跳转到指定楼层
#
发表于 2010-4-14 22:54:42 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
由于被测试系统是银行项目,很多操作都是功能键和小键上的操作,现在要模拟小键盘上的*号键,有什么办法来实现。
用以下代码只能模拟出功能键的操作:
如:以下代码实现模拟键盘按F1功能键,我现在想实现模拟小键盘上的“*”号键,怎么实现?
Dim WshShell
set WshShell = CreateObject("Wscript.Shell")
WshShell.SendKeys "{F1}"
Set WshShell = nothing
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

4#
发表于 2010-4-20 10:46:07 | 只看该作者
2楼正解
用小键盘的话调windows api是最好用的..
那些什么直接输入内容的大部分区分不了大小键盘

extern.Declare micvoid,"keybd_event","user32.dll","keybd_event",micByte,micByte,micLong,micLong
extern.keybd_event 96,0,0,0                       
extern.keybd_event 96,0,2,0
96是小键盘上0的键盘码 第三个参数0是键盘按下动作,2是键盘弹起动作
回复 支持 反对

使用道具 举报

  • TA的每日心情
    开心
    2018-7-13 14:04
  • 签到天数: 6 天

    连续签到: 1 天

    [LV.2]测试排长

    3#
    发表于 2010-4-20 09:29:39 | 只看该作者

    回复 1# 的帖子

    SendKeys "+{8}" 就会输出*了
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    2#
     楼主| 发表于 2010-4-16 18:13:01 | 只看该作者
    用 WshShell.SendKeys "*"
    用 WshShell.SendKeys "=8"

    用Extern.Declare micVoid,"keybd_event","user32","keybd_event",micByte,micByte,micLong,micLong

    Extern.keybd_event 106,0,0,0
    都不成,感觉是被测试程序收不到焦点
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    1#
    发表于 2010-4-15 15:42:38 | 只看该作者
    有*的符号
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-11-8 14:18 , Processed in 0.069895 second(s), 27 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表