Question

VB Findwindowex 的问题请教高手

Dim b As Long, c As Long
b = FindWindow(vbNullString, "系统登录")
If b <> 0 Then
c = FindWindowEx(b, 0, "ThunderRT6TextBox", "")
text1=c
end if
我主要是知道一个相当于类似text框的，类名为"ThunderRT6TextBox", 但我不知道他的句柄，有什么办法知道他的句柄吗？b是父窗口的句柄，为什么我这样得不到的？

Answer 1

是不是窗口名不对？那个“系统登录”是不是完整的窗口名。
这样试试
Dim Fhwnd As Long
Dim Chwnd As Long
Fhwnd = FindWindow(vbNullString, "系统登录")
Chwnd = FindWindowEx(Fhwnd, ByVal 0&, "ThunderRT6TextBox",
vbNullString)

Answer 2

需要使用API获取，比较复杂。
我这里有个excel文件运行其中的宏，你可以查询任意窗体或其中控件的类名、句柄等信息，其中可查看vba代码(Window类)。你留个邮箱。

Answer 3

s