如何在System.Windows.Forms.Keys中使用变量?

时间:2012-04-25 01:20:14

标签: vb.net visual-studio-2010

我想将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

1 个答案:

答案 0 :(得分: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