在VB中，可以使用FindWindow函数来获取窗口句柄。FindWindow函数需要传入窗口的类名和窗口标题作为参数，它会返回找到的窗口的句柄。
以下是一个示例代码：
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer Private Sub GetWindowHandle() Dim hwnd As Integer hwnd = FindWindow(vbNullString, "窗口标题") ' 将"窗口标题"替换为要查找的窗口的标题 If hwnd <> 0 Then MsgBox "找到窗口，句柄为：" & hwnd Else MsgBox "未找到窗口" End If End Sub 要获取窗口句柄，请将"窗口标题"替换为要查找的窗口的标题。如果找到了窗口，FindWindow函数将返回该窗口的句柄；如果没有找到窗口，它将返回0。在上面的示例中，使用MsgBox函数显示了找到窗口的句柄或未找到窗口的消息框。
