Textboxda keypresser problemim

[root426]

VB 2005 de .net ile yapıyorum
Beyler ben şu kod ile yazı yazdırtmıyorum alta geçirtmiyorum

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
e.Handled = True
If IsNumeric(e.KeyChar) Or e.Handled = 13 Then
e.Handled = False
End If
End Sub

ben bu kodla textbox içine harf girdirtmiyor enterede bastırtmıyorum ama sorunum şu backspace tuşı(silme işleminide yaptırtmıyor) nasıl yaptırabilirm?

[civil]

entera bastırtmadığına eminmisin backspace in ascii kodu 8 ona göre e.keychar=8 kullanacaksın ama bana yukarı da rakamlara ve enterı yazdırmıyorsun gibi geldi harfleri değil

[civil]

pardon kodun üst kısmına şunu yaz

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


        If Asc(e.KeyChar) = 8 Then
            Exit Sub

        End If
        e.Handled = True

        If IsNumeric(e.KeyChar) Or e.Handled = 13 Then
            e.Handled = False
        End If

    End Sub

şunu dene birde

[root426]

ok saol bi deniyem gene dönerim sana

[root426]

olmadı

[root426]

tamamdır saol kardeş buldum

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox111.KeyPress, TextBox9.KeyPress, TextBox8.KeyPress, TextBox7.KeyPress, TextBox6.KeyPress, TextBox5.KeyPress, TextBox4.KeyPress, TextBox3.KeyPress, TextBox2.KeyPress, TextBox11.KeyPress, TextBox10.KeyPress
e.Handled = True 'This effectively Cancels the Keypress
If Asc(e.KeyChar) = 8 Then

e.Handled = False
End If

If IsNumeric(e.KeyChar) Or e.Handled = 13 Then
e.Handled = False
End If

[root426]

kardeş msn e ekledim ordan bir sorum daha var

[root426]

Modlar konuyu silebilirsiniz

[civil]

bende oldu yukarıdaki kod ... vb6 mı kullanıyorsun vb.net mi ...

[root426]

vb 2005 pro