[Ksa004]

lمساء الخير ,,,,,

اود ان اعرض لكم طريقه ربما يحتاجها البعض وهي كتابة الحروف فقط في textbox

الطريقه قد تكون مجديه كما في الكود التالي

If Val(Text4.Text) > 0 Then
MsgBox ("Error, should contain only alphabets only")
Text4.Text = ""
Else
MsgBox ("OK! Contain only alphabets!")
Text4.Text = ""
End If


كذالك كتابة الأرقام فقط فيtext box

If Not IsNumeric(Text1.Text) Then MsgBox "not number"


مع الشكر

[starwarr2005]

شكرا جزيلا