[Solved]Program just closes

[Blubb1337]

Ok, well by clicking on this button:

    Private Sub ButtonX10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonX10.Click
        'health
        health.Enabled = True
    End Sub

Health = timer1

   Private Sub health_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles health.Tick
        'health
        Dim string1 As Long
        Dim string2 As Integer
        Try
            string1 = readdll("cshell.dll")
            string2 = "&H" + Hex(string1 + &HEA7804)
            Call CYVLKCNBWG(string2, 999999, 4)
        Catch
            MsgBox(ErrorToString)
        End Try
    End Sub

Game is open. Doesn't work tho...

[NextGen1]

Wait , Does the game close, or does the program close

[mnpeepno2]

according to the code, it looks like the game closes...

[Blubb1337]

program did, fixxed anyways

had to make two new modules for singleplayer(dumb fault)...

[NextGen1]

Glad to hear it is solved



/closed