如何取得其他应用程序的标签控件中的文本？？

Question

我使用 SendMessage hwnd, WM_GETTEXT, 1024, txtResult
总不成功

Answer 1

hwnd没问题，可是我的返回结果总是不对

Answer 2

//如何取得其他应用程序的标签控件中的文本？？先要看这个标签控件是不是真正的控件，如果不是的话（比如vb的标签控件，就是程序运行时用api函数画上去的），就没有句柄，当然发送消息也不会成功

Answer 3

'发送WM_GETTEXT 消息示例，一个按钮，一个文本框
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_GETTEXT = &HDPrivate Sub Command1_Click()
    Dim s As String
    s = Space(256)
    Dim i As Long
    i = SendMessage(Text1.hwnd, WM_GETTEXT, 256, ByVal s)
       
    MsgBox Trim(Left(s, i))
End SubPrivate Sub Form_Load()
    Text1.Text = "AA歼击机123"
End Sub

Answer 4

//那怎样取得vb的标签控件的文本？？？像ocr软件那样，根据各点像素的颜色