VB.NET: backspace button code?

[korndevil666]

hello.

i have written a calculator program in VB.net as im still new and working things out i have a tiny problem. i have 10 buttons zero to nine, a decimal button, plus button, equals button, textbox display, reset button and a backspace button.

ive done everything except the backspace button. (say if i click a wrong number, i want to go back and click a different 1) but i have no idea what the code is and how i do it.

thanks, help apprechiated :)

[albertw]

hello.

i have written a calculator program in VB.net as im still new and working things out i have a tiny problem. i have 10 buttons zero to nine, a decimal button, plus button, equals button, textbox display, reset button and a backspace button.

ive done everything except the backspace button. (say if i click a wrong number, i want to go back and click a different 1) but i have no idea what the code is and how i do it.

thanks, help apprechiated :)

hi

backspace is same as Chr(8)

[korndevil666]

hi

backspace is same as Chr(8)

okay thanks. but what is the code for the button?, havent used chr before

[albertw]

okay thanks. but what is the code for the button?, havent used chr before

hi
you can use the _keydown method

Private Sub AnObject_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyBack Then
.. enter your code here ...
End If 
End Sub
 

or the _keypress method

Private Sub AnObject_KeyPress(KeyAscii As Integer)
If KeyAscii = 8 Then
.. enter your code here ...
End If
End Sub
 

[korndevil666]

hi
you can use the _keydown method

Private Sub AnObject_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyBack Then
.. enter your code here ...
End If 
End Sub
 

or the _keypress method

Private Sub AnObject_KeyPress(KeyAscii As Integer)
If KeyAscii = 8 Then
.. enter your code here ...
End If
End Sub
 

ohh, yeah it works, thats alot for your help :)

[gbubeshattur]

Hi .. all..
i am working on login page in maa project using vb.net.
in that after enterring the username if i press the enter i need that control should pass to the submit buton ..can any one give me the code plz
thanks in advance
tq

[salgaonkarayush]

Private Sub txtUser_KeyPres s(KeyAscii As Integer)
If KeyAscii < 48 Or KeyAscii > 122 Then
txtUser.Text = ""
MsgBox "Enter only alphabets", vbOKOnly
KeyAscii = 8
ElseIf KeyAscii = 58 Or KeyAscii = 63 Or KeyAscii = 59 Or KeyAscii = 60 Or KeyAscii = 61 Or KeyAscii = 62 Then
txtUser.Text = ""
MsgBox "Enter only alphabets", vbOKOnly
KeyAscii = 8
End If
i want 2 make my backspace key work normally wat code should i modify or any better way 2 proceed

[salgaonkarayush]

can u reply the inner code 4 this 2
Private Sub AnObject_KeyPre ss(KeyAscii As Integer)
If KeyAscii = 8 Then
.. enter your code here ...
End If
End Sub

[hectorhoney]

@korndevil666
hi i am reading your problem ........
you can make one button in the code view and change name=bbackspace then its text property backspace.in property window.....now clicked backspace button
AND USE FOLLOWING CODE
Private Sub bbackspace_Clic k(ByVal sender As System.Object, ByVal e As System.EventArg s) Handles bbackspace.Clic k
Dim d As New Integer

If (TextBox1.Text. Length > 0) Then
d = TextBox1.Text.L ength
TextBox1.Text = TextBox1.Text.R emove(d - 1, 1)




End If





End Sub