السلام عليكم ورحمة الله وبركاته
# لدي مجموعه من text box وقد وضعت لكل text box حد معين (max length )فمثلا لدي text box وضعت له max length=6 ولكن لااستطيع ان ادخل فيه الا 5 ارقام ولكي ادخل الرقم السادس لابد ان اضغط مفتاح delete وقد قمت بارفاق مثال لذلك فارجو منكم ان تجربوا وتطلعوني على سبب المشكله .
# والمشكله الاخرى هو عندما اضع مؤشر الماوس في textbox فانه في بعض الاحيان يترك مسافة حرف واحد فهل هناك طريقه بحيث انه عندما تضع المؤشر داخل textbox فانه لايترك مسافه .
شكرا لكم .
تم تعديل هذه المشاركة بواسطة mse07 في 20 مارس 2007 في 14:17
إستخدم الكود:
Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii < 10 Then Exit Sub If Len(Text1) > 6 Then KeyAscii = 0 End Sub
شكرا لك على تجاوبك لكن لم يتغير شيء
السلام عليكم
مشكلتك بســـــــــــــــــــــــــــيطة
المشكلتان لنفس السبب التالي :
المشكلة لديك أخي الكريم أنك في نص TEXTBOX يعني خاصية الTEXT له
قد أضفت فراغاً وبالتالي فقد احتسب حرف احذف الفراغ
و ستنحل المشكلة بإذن الله
يبدو أنك أخطأت في تيكست وبدأت تنسخه وتلصقه و لم تأت بواحد جديد
و السلام عليكم
ألا بذكر الله تطمئن القلوب
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…
