dl1 = GetForegroundWindow()
dl2 = GetWindowText(hwnd, cap, 128)
text1.text=caphwnd已经成功获取
可是发现text1.text变空了,即cap怎么是空的,那个程序是我自己编的,不可能是空标题啊
dl2 = GetWindowText(hwnd, cap, 128)
text1.text=caphwnd已经成功获取
可是发现text1.text变空了,即cap怎么是空的,那个程序是我自己编的,不可能是空标题啊
Dim TitleStr As String * 255 '窗口标题会返回到这个变量里面,为定长字符串,最好最255这个最大值,如果小于了标题长度会出错
Dim cchlen As Integer '这个参数要求为TitleStr长度减1
Dim N As Long 'API返回值
cchlen = Len(TitleStr) - 1 'API定义规定的
N = GetWindowText(Me.hwnd, TitleStr, cchlen)
你换这个看下就知道了一要定义TitleStr的长度 cchlen=Len(TitleStr) - 1