手把手教你TestComplete_读键盘输入示例

 

 

    大家可能有疑问，为啥要读键盘输入。其实是这样的，自动化测试的时候，如果运气好，可以代码全部操作，不过有时候界面操作判断复杂，急于赶工期，或者有些对象一下子难以识别，说不准就需要人工控制，运行到某个界面的时候，死循环等着某按键，然后进行一些操作，操作完成后，再按下某键激活下一步的流程。这个东东比较江湖，临到要用的时候，或许就需要了。

    这事让我比较惊讶，因为最初以为会有一个类似readkey的函数，读入键盘输入，结果搜了一个遍，找不到。最后只好用win32api来读取键盘指定键的状态。感觉有点高射炮打苍蝇，力使得有点狠。但是的确没有找到其他的法子，要是哪位大侠有更好的法子，望不吝赐教。

 

代码：

Sub Readkey

  dim x,y

  x = Win32Api.GetKeyState(65)
  y = Win32Api.GetKeyState(97)
  While (x<>-127 and x<>-128 and y<>-127 and y<>-128)
    BuiltIn.Delay 2000, "在操作完成后，按字母 A/a 。。。。。。"    
    x = Win32Api.GetKeyState(65)
    y = Win32Api.GetKeyState(97)
  Wend

End Sub