PDA

View Full Version : فعال کردن کد back



mmd2009
دوشنبه 19 بهمن 1388, 12:51 عصر
بچه ها کدهای زیر کاری مکینه که کاربر جز عدد چیزی وارد نکنه ولی متاسفانه دکمه های back و enter هم غیر فعال میشن

راهی هست اونا رو فعال کردد>؟



If Not IsNumeric(e.KeyChar) Then
e.Handled = True
Else
e.Handled = False
End If

karim orooji
دوشنبه 19 بهمن 1388, 15:26 عصر
برای این کار از این کد استفاده کن
مشکلت حل میشه
دوست من




If Not IsNumeric(e.KeyChar) And e.KeyChar <> Convert.ToChar(Keys.Back) And e.KeyChar <> Convert.ToChar(Keys.Delete) Then
e.Handled = True
End If

mmd2009
دوشنبه 19 بهمن 1388, 15:34 عصر
زبونم برای تشکر بند اومده دیگه واقعا ممنونم

DoDoklak
دوشنبه 19 بهمن 1388, 15:34 عصر
میتونی از این کد هم تو رویداد KeyPress استفاده کنی


If Char.IsNumber(e.KeyChar) = False Then
e.Handled = True
End If
If e.KeyChar = (vbBack) Then
e.Handled = False
End If
If e.KeyChar = (vbTab) Then
e.Handled = False
End If

jahanmanesh
دوشنبه 19 بهمن 1388, 16:07 عصر
اگه میخوای در تکست باکس هات از اعداد تنها استفاده کنی
میتونی از toolbox عنصر Masked TextBox رو استفاده کنی

bah_jaf
دوشنبه 19 بهمن 1388, 16:10 عصر
دوست عزیز این رو هم میتونی بنویسی:

If (InStr("0123456789", e.KeyChar) = 0) And Asc(e.KeyChar) >= 65 Then e.KeyChar = ""
اینجوری کلید های کنترلی تمامشون کار میکنه