Sendkeys problem

Hi, I need help that in my program that goes like this:
Private Sub Command1_Click()
A = shell("C:\@IE\ie.exe", 1)
AppActivate A
MsgBox "Please go to the website and enter the details, tab to go to sent button!"
Check = True: Counter = 0
Do
SendKeys "~", True
Do While Counter < 101
SendKeys "~", True
PauseTime = 10
Start = Timer
Do While Timer < Start + PauseTime
Loop
Finish = Timer
SendKeys "%{LEFT}", True
Counter = Counter + 1
If Counter = 100 Then
Check = False
Exit Do
End If
Loop
Loop Until Check = False
MsgBox "Done 100x"
End Sub

There is a problem in thius program as this is my first time using vb4 and my vb6 can't work as there say that I need to reinstall MSDN eventhough I fully installed it! (This is the 2nd problem I hope people can help me too...)

Firsty of all, this program has a click button, when clicked, will first activate the internet explorer, then stop to alert me and allow me to go to the website i want and go to the "submit" button on the website, then i can fill in what i want, then i press "ok" from the msgbox to continue the program and let it send "enter" to the "submit" button in the IE5.5 and then wait 10secs for the website to submit the details and then autorefers to another page in IE, after my vb wait 10sec, it will then SendKeys "%{LEFT}", True and so IE would go back to the "submit" page again. and the process repeats again for 100 times.

the problem i met in win98 is that IE keeps opening and opening and doesn't give me time to input the info on the website and i'm not sure if the keystrokes is working.

hope that someone can help me correct the thing above or at least suggest an alternatives...

this program which i want to create, main objective is to submit information on a website 100x. hope that someone can help me on that.

thanks alot