Vb6 如何查找VB窗口/窗体id

Vb6 如何查找VB窗口/窗体id,vb6,Vb6,要求:需要关闭/关闭特定的VB窗口。 我听说过指定窗口名时会这样-我们可以跟踪窗口id,并使用该id可以杀死/关闭活动窗口。 此功能是否帮助我-HWND ID by(HWND ID) 如果我错了,请纠正我,并帮助我查找窗口id。使用me.close或unload(me)关闭活动窗口 要从form2关闭form1,可以使用unload(form1)或form1.close(在vb.net中工作) 下面是给定标题或部分标题的(并确定其窗口句柄或hWnd) 这是一次你知道的窗口处理 来自卡尔·彼得森

要求:需要关闭/关闭特定的VB窗口。

我听说过指定窗口名时会这样-我们可以跟踪窗口id,并使用该id可以杀死/关闭活动窗口。 此功能是否帮助我-
HWND ID by(HWND ID)


如果我错了,请纠正我,并帮助我查找窗口id。

使用
me.close
unload(me)
关闭活动窗口 要从form2关闭form1,可以使用
unload(form1)
form1.close(在vb.net中工作)

  • 下面是给定标题或部分标题的(并确定其窗口句柄或hWnd)

  • 这是一次你知道的窗口处理


来自卡尔·彼得森优秀的VB6网站

如果窗口有标题,您可以执行以下操作

Private Declare Function FindWIndow Lib "user32" _
    Alias "FindWindowA" _
    (ByVal lpClassName As Any, _
    ByVal lpWindowName As Any) _
    As Long
...
Dim hWnd As Long
Dim strTitle As String
strTitle = "whatever your title is"
hWnd = FindWIndow(vbNullString, strTitle)
If hWnd <> 0 Then
    Debug.Print "Window ID or Handle is " & Hex(hWnd)
Else
    Debug.Print "Cannot find handle"
End If
私有声明函数FindWIndow Lib“user32”_
别名“FindWindowA”_
(ByVal lpClassName,如有)_
ByVal lpWindowName(如有)_
只要
...
暗淡的hWnd尽可能长
像线一样暗的线
strTitle=“无论你的头衔是什么”
hWnd=FindWIndow(vbNullString,strTitle)
如果hWnd为0,则
调试。打印“窗口ID或句柄为”&十六进制(hWnd)
其他的
调试。打印“找不到句柄”
如果结束

使用spy++要关闭的VB窗口处于活动状态,但需要从另一个VB窗口/窗体关闭。该窗口是否有标题?如果是这样,请尝试从其他窗口/窗体关闭窗口。我相信关闭和卸载(我)都不起作用。