اذهب الي المحتوي
أوفيسنا

منع كتابة الرموز على تكست بوكس


amine14
إذهب إلى أفضل إجابة Solved by عبدالفتاح في بي اكسيل,

الردود الموصى بها

  • أفضل إجابة

يمكنك اضافة  رموز  اخرى تفضل  هذا  الكود 

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
On Error Resume Next
 If InStr("/\? * [ ]", Chr(KeyAscii)) Then KeyAscii = 0
End Sub

 

  • Like 2
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information