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