IsWindow

機能

指定のウィンドウが存在するかどうか調べる

Declare Function IsWindow Lib "user32.dll" _

    (ByVal hWnd As Long) As Long

Declare Function IsWindow Lib "user32.dll" _

    (ByVal hWnd As Integer) As Integer

BOOL IsWindow(
HWND hWnd
);
引数
hWnd

ウィンドウのハンドル

戻り値

存在するとき  0以外

しないとき  0

サンプル

ダウンロード(IsWindow.lzh 1.10KB)

'指定のウィンドウが存在するか調べる
Private Declare Function IsWindow Lib "user32.dll" (ByVal hWnd As Long) As Long


Private Sub Command1_Click()
Dim rc As Long
rc = IsWindow(Me.hWnd)
If rc = 0 Then
    Me.Text1.Text = "存在していないらしい...。"
Else
    Me.Text1.Text = "存在しているよ!(見えているんだから...)"
End If
End Sub