VB 2005 ile texbox’a girilecek Verileri Kısıtlama

VB.net 2005 ile textbox a girilecek verileri kısıtlama

Aşağıda program yazarken sıkça raslanınan textbox a verilerin girilmesi sırasında integer bir değer girlişmesi gerekiyorsa bunun harf veya farklı bileşenler girilmesini engellemek için kısıtlamalar yapılması gerekiyor. bunun için aşağıda birkaç farklı yol göstermeye çalıştım.



sağaşıdaki örnekte sadece 0 dan 9 u kadar olan rakalmalrın ve backspace tuşunun girilmesi için izin veriyor.



If (e.KeyChar < "0" OrElse e.KeyChar > "9") _

AndAlso e.KeyChar <> ControlChars.Back AndAlso e.KeyChar <> "." Then

e.Handled = True

End If



Bir başka örnek. Text box un keypres eventine ekleyiniz. Aşadaki örnek ascii karaklterleri control ederek çalışıyor. Bunları isteğinize gore değiştirebilirsiniz.

Private Sub textbox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtdeger.KeyPress

Dim keyascii As Integer = Asc(e.KeyChar)

Select Case keyascii

Case 48 To 57 "0 ile 9 arası

Case 46 ".

Case 45 "-

Case 8 " backspace

Case 13 "enter

btnOk.PerformClick() ‘burada enter e basılırsa ok butonuna basılmış gibi işlem yapmasını sağlıyoum. Kullanıcının kolaylığı için.

Case Else

e.Handled = True

End Select

End Sub