تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
عايز كود اختصار للاومر البرنامج عن طريق الكيبورد فيجوال بيسك 2010
#1
السلام عليكم ورحمة الله وبركاته

اخواني اريد منكم كود للتحكم في اومر البرنامج عن طريق اختصارات الكيبورد مثلا

ctrl+n تبقي ملف جديد
وهكذا

انتظر الرد منكم تقبلو تحياتي
الرد }}}}
تم الشكر بواسطة:
#2
كود :
Private Sub TextBox1_KeyDown(sender As System.Object, e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
        If e.KeyCode = Keys.N AndAlso e.Control Then
         Form2.ShowDialog() 'او ضع اى امر اخر هنا
        End If
    End Sub
الرد }}}}
تم الشكر بواسطة:
#3
وعليكم السلام ورحمة الله وبركاته

في حدث الفورم كي داون ( Form1_KeyDown ) ضع الكود التالي

If (e.KeyCode = Keys.N AndAlso e.Modifiers = Keys.Control) Then
MsgBox("CTRL + N Pressed !")
هنا ضع الكود المطلوب
End If

وتستطيع تغيير حف (N) الموجود بعد (Keys) وكذلك (Control) بأي رمز آخر

ولو اردت رمز او حف واحد يكون الكود كالتالي :

If e.KeyCode = Keys.ControlKey Then
MsgBox("Ctrl Pressed")
End If
الرد }}}}
تم الشكر بواسطة:
#4
للاسف الاكواد ليست هي المطلوبه احواني
انا عايز كود اختصارات زاي في اي برنامج تلاقي اداه MenuStrip1
وتلاقي قائمه منسدله للاختيارات وامام كل اختيار اختصار للامر عن طريق الكيبورد مثلا
للحفظ ctrl+s
جديد ctrl+n
وهكذا هو الكود المطلوب ده منتظر الرد منك تقبلي تحياتي
الرد }}}}
تم الشكر بواسطة:
#5
اخى الكريم انشيء MenuStrip ومن خصائصها يمكنك ان تفعل ماتريد
وبالنسبه لاختصارات الكيبورد ستجدها فى Properties > ShortCutKyes

ملحوظه:
انا مافهمت اى اكواد تريدها
"الناس نيام فإذا ماتوا إنتبهوا"
الرد }}}}
تم الشكر بواسطة:
#6
تفضل هذا المثال


الملفات المرفقة
.rar   اختصارات القوا&#15.rar (الحجم : 31.76 ك ب / التحميلات : 70)
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] ما سبب هذه الرسالة عند تشغيل البرنامج D-Z 7 72 أمس, 10:36 PM
آخر رد: D-Z
  كيف اجعل البرنامج ينفذ الكود الى فى الtextbox aliomar333 1 82 أمس, 05:32 PM
آخر رد: محمود صالح
  ما هو البرنامج وزارة الاتصالات محمود صالح 2 48 أمس, 05:19 PM
آخر رد: محمود صالح
  عايز اعمل حاجة تخليني اعرف كام جهاز مشغل البرنامج ومواصفات الاجهزة ووالوصول لقاعدة ال hoshosgost@yahoo.com 1 34 22-09-17, 08:04 PM
آخر رد: سعود
  [سؤال] عمل برنامج بالفجوال بيسك و تشغيلة على الجوال مهندس_خالد 2 76 20-09-17, 09:29 PM
آخر رد: محمود بكرى
  [سؤال] كيف استدعي ملف وورد بالفجوال بيسك وإضافة تاريخ وبيانات عليه عبقرينو 1 53 20-09-17, 06:08 PM
آخر رد: Rabeea Qbaha
  [سؤال] جلب ايقونة البرنامج ابو روضة 13 222 20-09-17, 03:13 PM
آخر رد: ابو روضة
  جديد علي الفجول بيسك ...احتاج مساعده (اسعدكم الله جميعا) Abdulhadi 13 367 18-09-17, 05:57 PM
آخر رد: Abdulhadi
Thumbs Up كيفية تشغيل وإغلاق الادوات الذكية لويندوز 7 عن طريق الكود رمضان محمد 5 805 18-09-17, 03:40 PM
آخر رد: رمضان محمد
  خطا عند فتح البرنامج عبدالرحمن المكاوي 24 378 18-09-17, 12:51 AM
آخر رد: عبدالرحمن المكاوي

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم