نوع نوشتار در textbox

[naser_feb8646]

سلام
در vb.Net2 چطور می تونم کاری کنم که در textbox فقط بشه عدد بنویسی

[*Batman*]

سلام
با فرض اینکه فقط میتونیم از Back Space استفاده کنیم:

PrivateSub TextBox1_KeyPress(ByVal sender AsObject, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress

If Asc(e.KeyChar) = 8 ThenExitSub
If (Char.IsNumber(e.KeyChar) <> True) Then
e.Handled = True
EndIf
If (Char.IsPunctuation(e.KeyChar)) Then
e.Handled = True
EndIf
EndSub

یا این :

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید