السلام عليكم ورحمة الله وبركاته
أولاً لم اشترك في هذا المنتدى الا بعد قراءة مواضيع كثيرة فيه ووجدت أن كل من هنا لديه الكثير من العلم وحب تعليمه للغير لذا أشكر الجميع على هذه المجهودات الرائعة ...
قمت بعمل كود يجعل مربع النص لا يقبل سوى الأرقام فقط :
Select Case KeyAscii
Case Asc("0") To Asc("9")
Case 8 And 127
Case 9
Case Else
KeyAscii = 0
Beep
End Select
ولكن لم أستطع أن أجعل مربع النص يقبل فقط أحرف..
أرجو من لديه العلم أن يفيدني في طلبي وإن كان هناك أي تعديل على الكود المكتوب أرجو الإفادة ..