Question

VB用API获取窗体句柄（已知窗体名）求代码：

VB用API获取窗体句柄，窗体名是Korns。

Answer 1

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
'API函数声明
Private Sub Form_Load()
dim hwnd1=long'定义一个句柄
hwnd1=FindWindow(vbNullString, "Korns")'根据窗口名找句柄
If (hwnd1) Then
msgbox "Found it"
End If
End Sub

追问

顺便再问一下前辈，若要调用获取到的句柄，代码怎么写阿，

追答

句柄是windows的资源的一种标识。实际上是一些资源的地址。通过句柄可以操作windows的某些资源。

追问

前辈。我举个例子（比如我要复制Korns窗体里的文本）代码单用Copy是不行的，代码应该怎么写阿。麻烦前辈给的示例代码。感谢前辈

追答

这个当然不行了，窗口名跟里面的内容是不一样的。Text文本框不设置passwordchar容就可以获得文本。这个要Hook拦截TextOut DrawText等函数才能实现。

追问

我给前辈你发信了，我看到了前辈的信。教我吧，前辈