Hotkey VB.NET By INike

Adicione na form o seguinte codigo!

<System.Runtime.InteropServices.DllImportAttribute("user32.dll")>

Private Shared Function GetAsyncKeyState(ByVal vkey As System.Windows.Forms.Keys) As Short
    End Function

Depois no timer!
Dim Hotkey As Boolean
        Hotkey = GetAsyncKeyState(Keys.F6)
        If Hotkey = True Then
           'Sua função !
        End If