Private Sub HotKeyTMR_Tick(sender As Object, e As EventArgs) Handles HotKeyTMR.Tick 
          Dim hotkey As Boolean 
          hotkey = GetAsyncKeyState(Keys.L) 
          If hotkey = True Then 
              RadioButton1.Checked = True 
              Else 
              RadioButton1.Checked = False 
          End If