为何用vb api获取的窗口标题为空，而SPY++却可以
VB中callbacke function 如下：
Public Function EnumChildProc(ByVal hwnd As Long, ByVal lParam As Long) As Long
Dim slength As Long, WndTitle As String ' title bar text length and buffer
Dim retval As Long ' return value
Dim WClass As String * 50
Static winnum As Integer ' counter keeps track of how many windows have been enumerated
winnum = winnum + 1 ' one more window enumerated....
slength = GetWindowTextLength(hwnd) + 1 ' get length of title bar text
WndTitle = Space(slength) ' make room in the buffer
retval = GetWindowText(hwnd, WndTitle, slength) ' get title bar text
GetClassName hwnd, WClass, 50
EnumChildProc = 1 ' return value of 1 means continue enumeration
End Function
结果列表在excel中，窗口句柄为66622的类可以找到，但是Title却为空
ChildWndHnd ChildWndClass ChildWndTitle
66624 TCoolBar
66626 TToolBar
66620 TCoolBar
66622 TToolBar
66618 TPanel
但是为什么SPY++中却可以找到：
retval = GetWindowText(hwnd, WndTitle, slength)
检查retval的值,看看函数执行的结果是什么.
API的调用都会有返回值,都会告诉你发生了些什么.
以上代码看不出hwnd是如�
相关问答：
一个窗体，3个datagrid，共计3个表，一个表对应一个datagrid，点击datagrid1(打开该窗体时已经被赋值)，根据datagrid1中的某个值，查询表2和表3，并把符合条件的分别赋值给datagrid2和datagrid3，要怎么写
VB ......
我想写一个asp读取本地机子的网瞳的功能，需要用vb写一个dll 在网上找了一下，把下面的段拷入vb工程里：
Option Explicit
Private Const NCBASTAT = &H33
Private Const NCBNAMSZ = 16
Private ......
我在我电脑(屏幕比较大)设计一个界面,但是在屏幕比较小的电脑上测试时,发现按钮不会随着屏幕大小而自动变大小.
要怎么设?
Me.Height = Screen.Height * 0.6
Me.Width = Screen.Width * 0.6
VB cod ......
怎么点击form2上的按钮 可以结束form1上正在进行的循环
form1里面添加一个变量：
Public bEnd As Boolean
循环代码添加：
bEnd = False
Do
...
If ......
