[Help me please!] Textboxes and math

[hacksign23]

well, I made this thingy, but I'm stuck on making text boxes only accept numbers. I've tried

Private Sub Text1_TextChanged(By Val KeyAscii as integer)
blah blah blah
End Sub

Apparently, KeyAscii does not pick up what ever is happening when I type.

Also, I want my text boxes to be numbers since they are only to be numbers, but they are picked up as strings. help please!!


Thanks.

P.S. If you can, please input the stuffs for me for only one text box. (text1)