[ HELP ] Stamina Code VB6

Posts 1–11 of 11 · Page 1 of 1
[ HELP ] Stamina Code VB6
First time using VB so trying to get hang of it i get error in this code
Code:
Private Sub Command1_Click()
If Timer1.Enabled = True Then
Timer1.Enabled = False
Else
Timer1.Enabled = True
End If
End Sub

Private Sub Timer1_Timer()
If GetKeyPress(vbKeyShift) Then
Dim STAN As Long
Dim STAN1 As Long
Call ReadALong("WarRock", &H1363380, STAN)
STAN1 = STAN + &H288
Call WriteAFloat("WarRock", STAN1, 100)
End Sub
Call ReadALong it wont let me save the .exe becuz " Compile Error: Sub or Function not defined " and then it highlights " Call ReadALong " and now i put in a hotkey and it highlights " GetKeyPress "
Not sure, haven't worked in VB in a while, but it seems like Call ReadALong is not properly defined.
Quote Originally Posted by arunforce View Post
Not sure, haven't worked in VB in a while, but it seems like Call ReadALong is not properly defined.
so how do u define it?
yes i used the undetected module generator
Quote Originally Posted by ilovepie21 View Post
yes i used the undetected module generator
Then you need to see what readalong is in your module
where is it in the module ? wat line
add END IF dude then it will work
Posts 1–11 of 11 · Page 1 of 1
This thread is closed for replies.

Similar Threads

Tags for this Thread

Need help?