المشاركات : 1,208
المواضيع 211
الإنتساب : Sep 2013
السمعة :
2
الشكر: 1
تم شكره 503 مرات في 297 مشاركات
السادة الافاضل
كيف اجعل التكست بوكس يقبل ارقام فقط مع عدم امكانية كتابة العلامة العشرية اكثر من علامة
125.25 صحيحة
12...25 خطأ
شكرا
المشاركات : 1,208
المواضيع 211
الإنتساب : Sep 2013
السمعة :
2
الشكر: 1
تم شكره 503 مرات في 297 مشاركات
شكرا علي اهتمامكم
لم نتمكن من كتابة الرقم العشري الفاصلة 12.75
اتمني ان استطيع ان اكتب فاصلة واحدة فقط
المشاركات : 664
المواضيع 32
الإنتساب : Oct 2013
السمعة :
81
الشكر: 776
تم شكره 992 مرات في 298 مشاركات
جربت الكود مافيه أي مشكلة؟
المشاركات : 23
المواضيع 5
الإنتساب : Feb 2014
السمعة :
0
الشكر: 0
تم شكره 4 مرات في 3 مشاركات
السلام عليكم هذه طريقتي
Dim c As Char
c = e.KeyChar
If Not (Char.IsDigit© Or Char.IsControl©) Then
If Not Textbox1.Text.Contains(".") And c = "." Then
e.Handled = False
Else
e.Handled = True ' annler
End If
End If