منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كود الظغط على زر f5 - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : كود الظغط على زر f5 (/showthread.php?tid=20650)

كود الظغط على زر f5 - bidaya - 07-06-17

السلام عليكم
رمضان مبارك
احتاج كود للظغط على زر f5 من البرنامد
مثال

كود :
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged


       'مثلا داخل الحدث للتكست بوكس



   End Sub
شكرا مسبقا


RE: كود الظغط على زر f5 - alma2 - 07-06-17

كود :
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Me.KeyPreview = True

    End Sub

    Private Sub Form1_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        If e.KeyCode = Keys.F5 Then
            MsgBox("تم الضغط على [F5] ")
        End If
    End Sub


RE: كود الظغط على زر f5 - bidaya - 07-06-17

(07-06-17, 05:32 PM)alma2 كتب :
كود :
   Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
       Me.KeyPreview = True

   End Sub

   Private Sub Form1_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
       If e.KeyCode = Keys.F5 Then
           MsgBox("تم الضغط على [F5] ")
       End If
   End Sub

اخي الكريم اريد الظغط على الزر من خلال الحدث

كود :
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged

احتاج كود في هذا الحدث بيظغط على الزر f5
     
   End Sub


RE: كود الظغط على زر f5 - alma2 - 07-06-17

كود :
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
        SendKeys.Send("{F5}")

    End Sub


RE: كود الظغط على زر f5 - bidaya - 07-06-17

(07-06-17, 06:22 PM)alma2 كتب :
كود :
   Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
       SendKeys.Send("{F5}")

   End Sub

شكرا جزيلا اخي Smile

RE: كود الظغط على زر f5 - أبووسم - 18-06-17

تمت الاستفادة من الكود

شكراً صاحب الموضوع و الأخ alma2