Горячие клавиши - VB

Формулировка задачи:

кто нибудь знает как к обычным кнопкам на форме задать значения горячих клавиш? или как к кнопкам задать значение стрелочек на клавиатуре? спасибо.

Решение задачи: «Горячие клавиши»

textual
                            Листинг программы 
                        

                            Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Label1.BorderStyle = 1: Label1.FontSize = 24: Label1.Alignment = 2
'на форме только  Label1
' понажимай кнопки и смотри на Label1
'там KeyCode  нажимаемой кнопки
 
Label1 = KeyCode
 
d = 75
 
Select Case KeyCode
Case 37, 100 'влево <-- , 4
Label1.Left = Label1.Left - d
Case 39, 102 'вправо --> , 6
Label1.Left = Label1.Left + d
Case 38, 104 'вверх | , 8
Label1.Top = Label1.Top - d
Case 40, 98 'вниз |, 2
Label1.Top = Label1.Top + d
Case 99 'вправо вниз --- 3
Label1.Left = Label1.Left + d
Label1.Top = Label1.Top + d
Case 103 'влево вверх ---7
Label1.Left = Label1.Left - d
Label1.Top = Label1.Top - d
Case 105 'вправо вверх --- 9
Label1.Left = Label1.Left + d
Label1.Top = Label1.Top - d
Case 97 'влево вниз --- 1
Label1.Left = Label1.Left - d
Label1.Top = Label1.Top + d
End Select
End Sub
                        