First off, here is the TI-BASIC code:
0→U:→V:0→A:0→B
AxesOff:ZStandard
Repeat K=45
getKey→K
U+.1((K=26)-(K=24)→U
V-.04+.15((K=25)-(K=34))→V
If 10<abs(A+U)
-.7U→U
If B+V<-10
-.7V→V
If B+V>10
-.7V→V
A+U→A
B+V→B
Pt-Off(A-U,B-V,2)
Pt-On(A,B,2)
End
Now let me explain a bit.
Instead of a point (obviously kind of hard in VB), I am using a 10x10 label. For looping, I am using a timer. For getKey, I am using MyBase.KeyDown. And no, I am not stupid, I DO know some Visual Basic ;) i have used all of the proper "Dim A As Integer = 0, B As Integer = 0, U As Integer = 0, V As Integer = 0" and I know that "A+U→A" is "A = A + U". And for KeyDown I am doing
Select Case e.KeyCodes
Case Keys.[key]
[do stuff]
etc.
I have tried converting that bit of code from TI-BASIC into VB.NET, but whenever I debug the program, the label only moves if you press the right arrow, and even then it moves out of the form before you can tell what happened.
Any help?