Bueno me di cuenta que no tenia agregada ninguna etiqueta xD
asi que le agregue una con el nombre Label1 quedo asi
Código:
Private Sub Timer1_timer()
Label1.Caption = Label1.Caption + 1
If Label1.Caption = 1 Then
Killapp "cdhack.exe"
End If
If Label1.Caption = 3 Then
Shell (Text1.Text & " -game cstrike - nomaster - console")
End If
If Label1.Caption = 5 Then
Killapp "hl.exe"
End If
If Label1.Caption = 7 Then
Label1.Caption = 0
Timer1.Enabled = False
End If
End Sub
pero se ejecuta al iniciar el programa dandome "error 13 en tiempo de ejecución, no coinciden los tipos "
yo lo que quiero que haga es que al hacer click en el boton de "Jugar CS" que habra el juego y se ejecute el codigo que esta arriba, osea primero que habra el CS normalmente pero que se cierre y se vuelva a abrir en 1.5 segundos.