كيف يمكن استخدام مفتاح enter

كل ما عليك هو كتابة الكود في فورم بالشكل التالي:

Private Sub Form_KeyDown()
If KeyCode = vbKeyEnter Then
"Expression"
End If
End Sub

حيث ستكون Expression هي نفس الكود الموجودة في الزر..

;)

أخي العزيز وضعت الكود مكان كلمة Expression ولكن دائما يعطيني رسالة خطأ

فهل تتكرم بتطبيق الطريقة على المثال المرفق في الرسالة الأولى والتأكد من

عمله بشكل صحيح ثم ترسله لي مع جزيل شكري .

تقبل تحياتي

Private Sub Form_KeyDown()

If KeyCode = 13 Then

"Expression"

End If

End Sub

يا شباب الله يجزيكم خير ممكن تطبقوا لي الكود على المثال المرفق بالمشاركة الأولى في الأعلى .... لأني حاولت وعجزت ..

تحياتي

تفضل يا اخى بعد كتابة الكود .....

test.zip

يعطيك العافية أخي محمود وجزاك الله كل خير .

والشكر موصول لجميع الأخوة .

تحياتي

ممكن تيجى فى الخواص الخاصة بزر الامر موافق ستجد خاصية تسمى defult

الافتراضى أجعل القيمة المقابلة لها True

فعند ضغتك على enterسيتم تنفيز الكود المطلوب و ان شاء الله تنجح هزه الطريقة

:D

يا سلام عليك أخي أحمد يوسف والله انك خطييييييييييير ;)

تحياتي

وانا شايف انك ماشاء الله نشيط وربنا يوفقق ويقنا جميعاً

:D:D:D