如何应用Sendkeys Down？

Question

我正在尝试使用VBA发送一个向下按键的页面。

Set Myscreen = Sys.Screen, SYS is set as Set Sys = GetObject("C:\Program Files\Attachmate\E!E2K\Sessions\AS400-A.EDP") 

我试过了；

Myscreen.SendKeys "{PGDN}"  
Myscreen.SendKeys ("{PGDN}")
Myscreen.SendKeys ("<PGDN>")
Myscreen.SendKeys "{PAGE DOWN}"
Myscreen.SendKeys ("{PAGE DOWN}")
Myscreen.SendKeys ("<PAGE DOWN>")
Myscreen.SendKeys "{PAGE DN}"
Myscreen.SendKeys ("{PAGE DN}")
Myscreen.SendKeys ("<PAGE DN>")
Myscreen.SendKeys "{Down}"
Myscreen.SendKeys ("{Down}")
Myscreen.SendKeys ("<Down>") - this was the only that did anything, it moved the cursor down a line.

我让delete使用Myscreen.Sendkeys ("<DELETE>")来工作。

Answer 1

{Page Down}的正确Syntax应为

Option Explicit
Sub sndkey()
    '// to send multiple times try "{PGDN 5}"
    Application.SendKeys "{PGDN}"
End Sub

看看MSDN & SendKeys Class

编辑

好的，我已经测试过了

Option Explicit
Sub sndkey()
    Dim Myscreen As Object
    Set Myscreen = Sys.Screen
    '// to send multiple times try "{PGDN 5}"
    Myscreen.SendKeys "{PGDN 6}"
End Sub

Answer 2

这是正确的语法Myscreen.SendKeys ("<rollup>")