1

例如,我想将 System.Windows.Forms.Keys 与变量一起使用

shortcutkey = "A"
keydata = System.Windows.Forms.Keys.shortcutkey

这可能吗?

这个想法是实现用户指定的自定义快捷方式来执行某些操作。

我的代码是这样的

        If (((BindingFunctions.IsKeyDown(Keys.ControlKey) AndAlso BindingFunctions.IsKeyDown(Keys.ShiftKey)) AndAlso BindingFunctions.IsKeyDown(keyData)) AndAlso (keyData = Keys.L)) Then
            CC.LC()
        End If

这里我直接给 keyData = Keys.L 。而不是这个,我想用一个变量来做

        mykeydata = "L"
        If (((BindingFunctions.IsKeyDown(Keys.ControlKey) AndAlso BindingFunctions.IsKeyDown(Keys.ShiftKey)) AndAlso BindingFunctions.IsKeyDown(keyData)) AndAlso (keyData = Keys.mykeydata)) Then
            CC.LC()
        End If
4

1 回答 1

2
Dim shortcutkey As String = "A"
Dim keyData As Keys

If [Enum].TryParse(Of Keys)(shortcutkey, keyData) Then
    ' keyData is now Keys.A
End If
于 2012-04-25T01:27:36.980 回答