vb.net - 如何在 vb.net 中使用 Insert 键？

Question

我正在开发一个在游戏中显示菜单的项目。但是要打开菜单，您必须按插入键。我找到了两种方法来做到这一点，但它们都给了我错误。这是代码：

      Dim insert As Boolean = GetAsyncKeyState(Keys.Insert)

或者

     GetAsyncKeyState(118)

我得到的错误是PInvoke restriction: cannot return variants

我对这个东西不是很熟悉，所以请帮忙，我怎么做才能按插入键？

Answer 1

如果这是 WinForms，请将表单的 KeyPreview 设置为 true 并覆盖 OnKeyDown 方法：

Public Class Form1

  Public Sub New()
    InitializeComponent()
    Me.KeyPreview = True
  End Sub

  Protected Overrides Sub OnKeyDown(ByVal e As System.Windows.Forms.KeyEventArgs)
    If e.KeyCode = Keys.Insert Then
      MessageBox.Show("I'm inserting!")
    End If
  End Sub

End Class