PriitK is too busy with Skype
![Eek](https://forums.trenchwars.com/core/../../core/images/smilies/eek.png)
VB6: Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Dim menuclass As Long menuclass = FindWindow("menuclass", vbNullString) If menuclass <> 0 Then MsgBox "Continuum is Open!" Else MsgBox "Continuum is Closed!" End If
VB6: Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Dim menuclass As Long menuclass = FindWindow("menuclass", vbNullString) If menuclass <> 0 Then MsgBox "Continuum is Open!" Else MsgBox "Continuum is Closed!" End If
Comment