在VB中,可以使用以下方法來獲取窗體的句柄:
Dim hWnd As IntPtr = Me.Handle
Imports System.Runtime.InteropServices
然后使用以下代碼來調用FindWindow函數:
Dim windowTitle As String = "窗體標題" '替換為實際窗體的標題
Dim hWnd As IntPtr = FindWindow(Nothing, windowTitle)
<DllImport("user32.dll", SetLastError:=True)>
Private Shared Function FindWindow(ByVal lpClassName As String, ByVal lpWindowName As String) As IntPtr
End Function
在上面的代碼中,通過傳遞窗體的標題給FindWindow函數,可以獲取指定窗體的句柄。
請注意,第二種方法需要導入Win32 API函數聲明,并且只適用于在當前應用程序之外的其他窗體。如果是在同一個應用程序中獲取窗體的句柄,建議使用第一種方法。