I still cant make warrock status code .

Can someone help me with my WarRock Status code :

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

hWnd = FindWindowA(vbNullString, Warrock_fenster_4)

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

Timer?: Interval - 100

Private Sub Timer?_Timer()
If running("Warrock") Then
Label1.Visible = True
Else:
Label2.Visible = True
End If
End Sub

But i have problem with Module Code . I allways get error : Findwindow

use this this work your mistak

you wrote:
findawindowa
right one:
finawindow

2. mistake:
Warrock_fenster_4

right one:
Warrock_fenster_4_


ps: you use my module?^^ because i got these string names? XD