[محمد القطيبي]

السلام عليكم كيف أعمل اختصارات بلوحة المفاتيح 
مثل حفظ يكون مثلا ctrl+s
جديد يكون ctrl+n

[ابراهيم ايبو]

السلام عليكم ورحمة الله وبركاته
اخي الكريم بالنسبة لانشاء اختصار لحدث ما 
اولا نفعل الخاصية   KeyPreview    الخاصة بالفورم الى True
او بالكود في حدث فورم لود كما هو موضح
ثانيا الحدث الذي نريد انشاء اختصار لتنفيذه وهو هنا كود اظهار رسالة في بوتون1
ثالثا في حدث KeyDown  الخاص بالفورم نكتب الكود الخاص بانشاء الاختصار

كود :

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Me.KeyPreview = True ' تفعيل قيول الاختصارات
   End Sub
'f4 الحدث الذي نريد انشاء اختصار له مع  مفتاح 
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       MsgBox("Welcom to Visual basic To all Arab")
   End Sub
   'f4 استدعاء الحدث عن طريق مفتاح

   Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown
       If e.KeyCode = Keys.F4 Then
           Button1_Click(Nothing, Nothing)
       End If
   End Sub

[alshandodi]

أو يمكنك استخدام هذا المقال فيه أكواد الكيبورد فقط تضغط على المفتاح في الكيبورد ويسر الكود اتمنى ان يكون ذو فائده
http://vb4arb.com/vb/showthread.php?tid=33626