VB自定义热键使用ini的方法

iniPath$ = App.Path + "\config.ini"

Timer1.Interval = 60000 '1分钟
a = GetFromINI("config", "timemin", iniPath) '1分钟 = 5分钟

Dim Key As String
Dim Message As Msg

'注册 Ctrl+Shift+A 为热键
'RegisterHotKey Me.hwnd, &HBFFF&, MOD_CONTROL + MOD_SHIFT, vbKeyA
RegisterHotKey Me.hWnd, &HBFFF&, MOD_CONTROL, vbKeyQ
Me.Hide
'等待处理消息
HotKey_F = False
Do While Not HotKey_F
'等待消息
WaitMessage
'检查是否热键被按下
If PeekMessage(Message, Me.hWnd, WM_HOTKEY, WM_HOTKEY, PM_REMOVE) Then
--------------------------------请问如何将vbkeyQ这个Q键用从ini读取，我想要用ini来自定义热键。谢谢!

魔兽自定义热键是怎样做的 有几种打开任务管理器的方法？除了使用那个使用热键的方法 求读写ini文件的方法和对异常处理的方法(VB) Struts的ActionForward自定义的方法中使用? vb 中使用declare的详细方法? VB中怎样使用自定义窗口 忘记QQ的自定义热键了,怎样恢复? 魔兽争霸3有没有快速自定义热键的软件阿？ VB自定义颜色的按钮 求教 boot.ini的使用