470,810 Members | 1,173 Online
Bytes | Developer Community
New Post

Home Posts Topics Members FAQ

Post your question to a community of 470,810 developers. It's quick & easy.

VB.NET: backspace button code?

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 :)
Oct 26 '06 #1
8 41983
albertw
267 100+
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)
Oct 26 '06 #2
hi

backspace is same as Chr(8)

okay thanks. but what is the code for the button?, havent used chr before
Oct 26 '06 #3
albertw
267 100+
okay thanks. but what is the code for the button?, havent used chr before
hi
you can use the _keydown method

Expand|Select|Wrap|Line Numbers
  1. Private Sub AnObject_KeyDown(KeyCode As Integer, Shift As Integer)
  2. If KeyCode = vbKeyBack Then
  3. .. enter your code here ...
  4. End If 
  5. End Sub
  6.  
or the _keypress method

Expand|Select|Wrap|Line Numbers
  1. Private Sub AnObject_KeyPress(KeyAscii As Integer)
  2. If KeyAscii = 8 Then
  3. .. enter your code here ...
  4. End If
  5. End Sub
  6.  
Oct 26 '06 #4
hi
you can use the _keydown method

Expand|Select|Wrap|Line Numbers
  1. Private Sub AnObject_KeyDown(KeyCode As Integer, Shift As Integer)
  2. If KeyCode = vbKeyBack Then
  3. .. enter your code here ...
  4. End If 
  5. End Sub
  6.  
or the _keypress method

Expand|Select|Wrap|Line Numbers
  1. Private Sub AnObject_KeyPress(KeyAscii As Integer)
  2. If KeyAscii = 8 Then
  3. .. enter your code here ...
  4. End If
  5. End Sub
  6.  
ohh, yeah it works, thats alot for your help :)
Oct 26 '06 #5
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
Jan 3 '07 #6
Private Sub txtUser_KeyPress(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
Aug 15 '07 #7
can u reply the inner code 4 this 2
Private Sub AnObject_KeyPress(KeyAscii As Integer)
If KeyAscii = 8 Then
.. enter your code here ...
End If
End Sub
Aug 15 '07 #8
@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_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bbackspace.Click
Dim d As New Integer

If (TextBox1.Text.Length > 0) Then
d = TextBox1.Text.Length
TextBox1.Text = TextBox1.Text.Remove(d - 1, 1)




End If





End Sub
Jul 10 '09 #9

Post your reply

Sign in to post your reply or Sign up for a free account.

Similar topics

1 post views Thread by gal20 | last post: by
1 post views Thread by ACaunter | last post: by
7 posts views Thread by R.A.M. | last post: by
reply views Thread by BarryM | last post: by
66 posts views Thread by Jon Skeet [C# MVP] | last post: by
reply views Thread by mihailmihai484 | last post: by
By using this site, you agree to our Privacy Policy and Terms of Use.