已经拿到窗体的句柄，用什么API函数拿到窗体标题名称，求教

美好未来686

比如我打开了一个CMD的窗体，我用FindWindow拿到了窗体的句柄，然后怎么读取到CMD的标题呢？比如标题叫 命令提示符，我怎样读取这个标题到变量中！大神们求教一下

zopey

Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, _
ByVal lpString As String, ByVal cch As Long) As Long

lss001

参考以下！！！

美好未来686

lss001 发表于 2019-1-10 18:08
Private Declare Function GetForegroundWindow Lib "user32" () As Long
Private Declare Function GetWi ...

如果是别的窗口怎么办，不是当前窗口，当前窗口的话就是EXCEL的，但我这是文本文档的窗口

zopey

hwnd 替为你拿到的 窗口句柄

美好未来686

zopey 发表于 2019-1-11 09:05
hwnd 替为你拿到的 窗口句柄

为什么拿到的标题后面有很多口 “命令提示符口口口口口口口口口口口口口口口口口口口口口口口口口口口口
这些口是什么东西，有办法去掉吗？

美好未来686

美好未来686 发表于 2019-1-11 09:35
为什么拿到的标题后面有很多口 “命令提示符口口口口口口口口口口口口口口口口口口口口口口口口口口口口
...

s = String(10, Chr(0))
明白了 我已经搞定了，s=split(s," ")(0)

lss001

美好未来686 发表于 2019-1-11 10:05
s = String(10, Chr(0))
明白了 我已经搞定了，s=split(s," ")(0)

Private Declare Function GetForegroundWindow Lib "user32" () As Long
Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" _
(ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Sub hqckbt() '获取窗口标题
    Dim k As Long, s As String * 255
    Shell "notepad.exe", 2'打开记事本
    Application.Wait Now + TimeSerial(0, 0, 2)
    k = GetForegroundWindow()
    GetWindowText k, s, Len(s)
    Shell "taskkill /f /im notepad.exe"'关闭记事本
    MsgBox "窗口标题: " & s
End Sub

YZC51

谢谢分享！！！