vb.net - 向下滚动注释查看器

Question

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

这是我尝试过的代码

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

是的，现在它可以工作了。我使用了这些代码

 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

Answer 2

iView.ScrollPosition = 新点(x,y)

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