Private Sub Form_Load()
KeyPreview = True
End Sub
ماذا يعني هذا الكود
Private Sub Form_Load()
KeyPreview = True
End Sub
ماذا يعني هذا الكود
أخي العزيز / أبووليد :D
تحية طيبة وبعد ،،،، هذا الكود يوضع في بدء تشغيل النموذج الذي من خلاله
سوف يتم عمل مفتاح معين لفتح نموذج معين مثال :
عندك نموذج اسمه ( f1 ) تريد أن تفتح من خلاله نموذج ( f2 ) ،،، ينبغي لك
أن تضع عند التحميل في نموذج ( f1 ) هذا الامر :
KeyPreview = True
ثم تضع في النموذج ( f1 ) في خاصية ( عند مفتاح للأسفل ) هذه الاوامر :
Select Case KeyCode Case vbKeyF2: DoCmd.OpenForm "f2" Case vbKeyF3: MsgBox "أهلاًوسهلاً بك في برنامج شئون الموظفين" End Select
هنا حددت للمفتاح ( F2) فتح النموذج ( f2 )
وحددت المفتاح ( F3 ) لإظهار رسالة ترحيبية ،،،
أي خلاصة الكلام هذا الكود كي يتعرف على المفاتيح التي سوف تسند لفتح نماذج من خلال هذا النموذج التي وضعت فيه ،،،،،
أرجو أن أكون قد وفقت لشرح ما طلبته أخي الكريم ،،،،، :)
مع تحيات : أبو عقيل (f)(gift)(f)
المسلم من سلم الناس من لسانه ويده
وفقك الله وبارك فيك
هذا الموضوع مغلق.