[alshandodi]

ما سبب عدم عمل هذا الكود في الفورم اذا كان الموشر في تيكست بوكس 

كود :

   Private Sub Form2_KeyDown(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown
       If e.KeyCode = Keys.F12 Then
           Button1.PerformClick()
       End If
   End Sub

ولكم مني جزيل الشكر والتقدير

[معاند الحظ]

السبب هو انك وضعت كود اطلاق الحدث عند ضغط الزر في النموذج
ضع الكود في حدث textbox_keydown

[alshandodi]

شكرا اخي العزيز على تفاعلك واذا كان بالمثال يوجد 10 textbox هل اكتب لكل تيكست بوكس الكود نفسه

[alsalamoni]

(28-01-20, 09:07 PM)alshandodi كتب :

ما سبب عدم عمل هذا الكود في الفورم اذا كان الموشر في تيكست بوكس 

كود :

   Private Sub Form2_KeyDown(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown
       If e.KeyCode = Keys.F12 Then
           Button1.PerformClick()
       End If
   End Sub

ولكم مني جزيل الشكر والتقدير

قم تفعيل الخاصيه KeyPreview تبع الفورم

[alshandodi]

شكرا جزيلا اخي لقد نجح الامر لدي