WarRock Status ?

Reason number 1 to stop vb6 -.-

omfg here you get add this to your module:

Public Function running(Warrock_fenster_4_ As String) As Boolean
Dim hWnd As Long

hWnd = FindWindow(vbNullString, Warrock_fenster_4_)

If (hWnd = 0) Then
running = False
Else
running = True
End If
End Function


timer1: (interval 100)
if running("Warrock") then
label1.visible = true
else:
label2.visible = true
end if
end sub


>_>

This code dont work .

OH FUX THATS WHAT YOU MENT. KK what you do is

if(FindWindow("warrock")) then WarRockOpen = True
else WarRockOpen = false

0 = false so that should work..

lol?? for me it works fine?!??!?! looool

You dont need to be Einstein to find out that this guy is complete idiot

And you think you are Einstein , Ha , LOLZ

no hes dead already, but the point is if you cant even copypaste ready sources to easiest programming language (if you know what it is) there is you souldnt start programming

Ok i try to learn more about visual basic .

didn't you forget to close the IF?

No, I didn't. Put that in your VB compiler, it will compile, Its a short way of writing an if.