21-07-14, 10:50 PM
أخواني الأفاضل
فيما يتعلق بسؤالي السابق حول إمكانية عدم السماح للمستخدم إضافة أكثر من رقمين بعد الفاصلة العشرية فقد وجدت من خلال البحث الكود التالي
إلا أن هذا الكود مع أنه لا يسمح بإدخال أكثر من رقمين بعد الفاصلة لكن بعد إدخال هذين الرقمين تتوقف الكتابة في التكست بوكس نهائياً ولايمكن التعديل
على كامل الرقم إلا بمسح ما بعد الفاصلة، مع العلم أني قد رأيت في إحدى المرات امكانية كتابة رقمين فقط بعد الفاصلة مع امكانية تعديل الرقم الذي قبل الفاصلة
أي تتوقف الكتابة فقط عندما يكون مؤشر الكتابة خلف الرقم الثاني بعد الفاصلة
آمل أخواني أني قد أوصلت الفكرة بشكل صحيح وأن ألقى ردودكم الكريمة قريباً
تقبلوا جميعاً تحياتي
فيما يتعلق بسؤالي السابق حول إمكانية عدم السماح للمستخدم إضافة أكثر من رقمين بعد الفاصلة العشرية فقد وجدت من خلال البحث الكود التالي
كود :
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If IsNumeric(e.KeyChar) Or e.KeyChar = "." Then
If InStr(TextBox1.Text, ".") > 0 Then
Dim TestText As String = Microsoft.VisualBasic.Right(TextBox1.Text, (Len(TextBox1.Text) - InStr(TextBox1.Text, ".")))
If Len(TestText) = 2 Then
e.Handled = True
End If
End If
End If
End Subإلا أن هذا الكود مع أنه لا يسمح بإدخال أكثر من رقمين بعد الفاصلة لكن بعد إدخال هذين الرقمين تتوقف الكتابة في التكست بوكس نهائياً ولايمكن التعديل
على كامل الرقم إلا بمسح ما بعد الفاصلة، مع العلم أني قد رأيت في إحدى المرات امكانية كتابة رقمين فقط بعد الفاصلة مع امكانية تعديل الرقم الذي قبل الفاصلة
أي تتوقف الكتابة فقط عندما يكون مؤشر الكتابة خلف الرقم الثاني بعد الفاصلة
آمل أخواني أني قد أوصلت الفكرة بشكل صحيح وأن ألقى ردودكم الكريمة قريباً
تقبلوا جميعاً تحياتي
{ اللهم علمنا ما ينفعنا وانفعنا بما علمتنا إنك أنت العليم الخبير }
