منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كود ينفذ من خلال لوحة المفاتيح
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
مرحباً أصدقائي/ كيفية عمل كود تقوم بضغط زر من الكيبود مع زر أخر مثل F2+حرف A تظهر نافدة من نوافذ المشروع 
الفكرة كأني ضغطت على زر أمر تظهر نافذه معينه
مرحباً أصدقائي/ كيفية عمل كود تقوم بضغط زر من الكيبود مع زر أخر مثل F2+حرف A تظهر نافدة من نوافذ المشروع 

الفكرة كأني ضغطت على زر أمر تظهر نافذه معينه
قم باضافه mdiForm
عن طريق

add new item
MDI parent form
ثم 
استعمل الكود التالي لاستدعاء اي شاشةتريدها 
كود :
Dim frm1 As New Form1()
frm1.MdiParent = mdiForm
frm1.show()
ملاحظة form1 هو اسم الفورم المراد فتحها
وللوصول للاختصار قف علي اي قائمة منبثقه من الفورم وعدل ما تريده في خانه
ShortcutKeys
بالتوفيق
(21-11-18, 07:54 PM)+yassen+ كتب : [ -> ]مرحباً أصدقائي/ كيفية عمل كود تقوم بضغط زر من الكيبود مع زر أخر مثل F2+حرف A تظهر نافدة من نوافذ المشروع 
الفكرة كأني ضغطت على زر أمر تظهر نافذه معينه

مرحبا حبيبي
ان شاء الله يكون هذا المطلوب
كود :
 Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
       If e.KeyCode = Keys.F2 Then
           Form2.Show()
       End If
   End Sub
هذا ماطلبته ولكم جزيل الشكر ولاكن واجهت مشكلة الكود يعمل مع الفورم العادي بدون مشكلة ولاكن أنا أستخدم DevExpress في برنامجي والكود لا يعمل هنا معي فما الحل لو سمحتم
(23-11-18, 02:23 AM)trakktour كتب : [ -> ]
(21-11-18, 07:54 PM)+yassen+ كتب : [ -> ]مرحباً أصدقائي/ كيفية عمل كود تقوم بضغط زر من الكيبود مع زر أخر مثل F2+حرف A تظهر نافدة من نوافذ المشروع 
الفكرة كأني ضغطت على زر أمر تظهر نافذه معينه

مرحبا حبيبي
ان شاء الله يكون هذا المطلوب
كود :
 Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
       If e.KeyCode = Keys.F2 Then
           Form2.Show()
       End If
   End Sub
بالاضافة الى هذا يجب نفعيل خاصية KeyPreview
شكراً لكم أصدقائي على المساعدة هذا ماكنت أريده أشكركم جميعاً على المساعده