تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] استخدام ازرار اضافية في البرنامج
#1
السلام عليكم
ارجوا المساعدة في كيفية استخدام الازرار مثل F2 و F3 و F4 و الخ في البرنامج ......
و شكرا ......
..................  و فوق كل ذي علم عليم  ................
الرد }}}
تم الشكر بواسطة:
#2
.....

كود :
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
    ' يمكن الاستغناء عن هذا السطر بتغيير هذه الخاصية من خصائص الفورم
    Me.KeyPreview = True

End Sub


Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As KeyEventArgs) Handles Me.KeyDown
    Select Case e.KeyCode
        Case Keys.F1
            MsgBox("تم الضغط على F1")

        Case Keys.F2
            MsgBox("تم الضغط على F2")

        Case Keys.F3
            MsgBox("تم الضغط على F3")

    End Select
End Sub

.....
الرد }}}
تم الشكر بواسطة: raoe-041
#3
(16-06-14, 05:48 AM)vbnet كتب : .....

كود :
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
    ' يمكن الاستغناء عن هذا السطر بتغيير هذه الخاصية من خصائص الفورم
    Me.KeyPreview = True

End Sub


Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As KeyEventArgs) Handles Me.KeyDown
    Select Case e.KeyCode
        Case Keys.F1
            MsgBox("تم الضغط على F1")

        Case Keys.F2
            MsgBox("تم الضغط على F2")

        Case Keys.F3
            MsgBox("تم الضغط على F3")

    End Select
End Sub

.....

شكرا اخي على الرد

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.KeyCode = Keys.F10 Then
Form2.Show()
End If
و هل استطيع ان استخدمها في عمليات الحفظ و الحذف و شكرا
..................  و فوق كل ذي علم عليم  ................
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة عند نقل البرنامج من فيجوال 2013 الى فيجوال 2017 strongriseman 5 148 12-03-24, 10:37 AM
آخر رد: strongriseman
  محتاج تشفير فيديو وتشغلية عن طريق البرنامج فقط new_programer 1 112 22-02-24, 12:09 PM
آخر رد: AHMED213
  [VB.NET] أرغب فى استخدام هذا الكود بالتحديد على الإصدار 10 AmeenRashed 3 206 19-01-24, 12:42 PM
آخر رد: Taha Okla
  مطلوب كود الطباعة لهذا البرنامج melad2002 2 234 13-01-24, 06:42 PM
آخر رد: melad2002
  مشكلة تعليق البرنامج في حال عدم وجود ماسح ضوئي متصل بالكمبيوتر صالح عبدالله 1 210 09-01-24, 10:51 PM
آخر رد: صالح عبدالله
  حل مشكلة بعد تثبيت البرنامج في جهاز العميل Adel27213 3 467 02-12-23, 11:00 PM
آخر رد: justforit
  كيف اجعل البرنامج في بداية الشهر ينفذ حدث معين بالاصح اريد البرنامج في تاريخ واحد من Adel27213 3 484 05-11-23, 01:45 AM
آخر رد: justforit
  [VB.NET] كيف اجعل البرنامج يحدد اخر يوم من كل شهر Adel27213 2 360 03-11-23, 06:50 AM
آخر رد: Adel27213
  [سؤال] عمل البرنامج على أى resoluation dr.programming 0 244 02-11-23, 12:08 AM
آخر رد: dr.programming
  تنصيب البرنامج على اجهزة العملاء um_noor20 2 326 30-10-23, 04:17 PM
آخر رد: Taha Okla

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


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