13-02-18, 01:40 AM
(آخر تعديل لهذه المشاركة : 13-02-18, 01:45 AM {2} بواسطة عبدالله الصافي.)
إذا كان الغرض من طلبك هو عدم الضغط علي زر الحفظ بالموس كل مرة لحفظ البينات
فيكفي ان تضيف هذا الكود المشروع
Private Sub Text4_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then Command1_Click
End Sub
والغرض منه هو عند الضغط علي زر انتر بالكيبورد اثناء وجود مؤشر الكتابة باخر خانة لاضافة البينات
فيقوم البرنامج بتنفيذ الكود بزر الحفظ
فيكفي ان تضيف هذا الكود المشروع
Private Sub Text4_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then Command1_Click
End Sub
والغرض منه هو عند الضغط علي زر انتر بالكيبورد اثناء وجود مؤشر الكتابة باخر خانة لاضافة البينات
فيقوم البرنامج بتنفيذ الكود بزر الحفظ