منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : طريقة حذف حرف زيادة من مربع النص
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
عندي مربع نص مخصص لكتابة سعر المنتج
لعدم حدوث خطأ قمت بتخصيص مربع النص هذا لاستقبال ارقام فقط وعدم السماح بكتابة حروف
كما سمحت ايضاً بكتابة العلامة العشرية
ولكن في هذه الحالة مربع النص يقبل ان يضيف المستخدم اكثر من علامة عشرية في نفس الرقم مما يسبب خطأ وتعطيل البرنامج
اريد كود يمنع المستخدم من كتابة اكثر من علامة عشرية واحدة في مربع النص
ولكم جزيل الشكر
......  اللذي يحضرني الان اولا نكتب دالة كاجراء مستقل :
PHP كود :
Private Function commacount(txt As String) As Integer
        Dim count 
As Integer 0
        For Each h 
As String In txt
            If h 
"." Then
                count 
+= 1
            End 
If
 
       Next
        Return count
    End 
Function 
 
و ضمن حدث TextBox1_KeyPress لمربع النص نكتب:
PHP كود :
 If (e.KeyChar "." And commacount(sender.text) > 0Then
            e
.Handled True
        End 
If 
و اكيد توجد اكواد افضل ننتظره من الاخوة الفضلاء.
فقط نستخدم الكود التالي ضمن حدث الـ (KeyPress):
كود :
Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
   If (e.KeyChar = ".") And (TextBox1.Text.Contains(".")) Then
       e.Handled = True
   End If

End Sub