如何使用QTP / VBA按/发送右Ctrl键?

时间:2015-04-24 14:46:45

标签: vbscript qtp ctrl

我需要自动化1个系统,其中1步是按右ctrl键(左ctrl键不起作用)。

我已经尝试过sendkeys方法,但它无效。

在VB脚本中有没有其他方法可以发送/按下右ctrl键?

提前致谢。

3 个答案:

答案 0 :(得分:1)

好吧,我使用了DeviceReplay。

这是一段代码..

Set DeviceReplay = CreateObject("Mercury.DeviceReplay")

DeviceReplay.PressKey 157

我们需要发送Asc代码作为Presskeys的参数。 (157是asc代码)

有关finding asc code for other keystrokes的更多信息。

答案 1 :(得分:0)

您是否尝试过frmItensVenda := TfrmItensVenda.Create(nil); frmItensVenda.vtipo := vtipo; frmItensVenda.vcontrole := strtoint(edit1.Text); frmItensVenda.Ednota.Text := Edit5.Text; frmitensvenda.lbvend.Caption := combobox3.Text; frmitensvenda.lbnome.Caption := combobox1x.Text; frmItensVenda.limite := limite; if label10.caption <> '' then frmItensVenda.vcli := strtoint(label10.caption); frmItensVenda.ShowModal; Frmitensvenda.Close; frmItensVenda.Free;

https://www.autoitscript.com/autoit3/docs/appendix/SendKeys.htm

autoit右ctrl

{RCTRL}表示左ctrl

答案 2 :(得分:0)

据我所知,使用QTP工具无法实现此目的。但是您可以使用纯VBscript(在QTP之外)并使用其他工具。

编辑:哇。我有所纠正。