向下滚动AnnotateViewer

Question

你能在VB.Net中帮助我吗？ 我试图在这里为我的AnnotateViewer设置一个快捷方式 当我按“Ctrl + Down”时 视图必须向下滚动。

这是我试过的代码

Dim pt As Point = iView.ScrollPosition
    If e.Control And e.KeyCode = Keys.NumPad0 Then
      pt.Y -= 99999
      Msg("Scroll Down")
    End If

Answer 1

iView.ScrollPosition = new Point（x，y）

更改水平滚动的x值，垂直滚动条的y值。

Answer 2

是的，现在它有效。 我使用了这些代码

 If e.Control And e.KeyCode = Keys.NumPad2 Then
        iView.ScrollPosition += New Point(0, -90)
    ElseIf e.Control And e.KeyCode = Keys.NumPad8 Then
        iView.ScrollPosition += New Point(0, 90)
    ElseIf e.Control And e.KeyCode = Keys.NumPad4 Then
        iView.ScrollPosition += New Point(50, 0)
    ElseIf e.Control And e.KeyCode = Keys.NumPad6 Then
        iView.ScrollPosition += New Point(-50, 0)

    End If