Ayuda para problemas de programación en vb

Para implementar esta función, es necesario tener cierto conocimiento del mecanismo de mensajes de Windows.

La persona arriba sólo puede apuntar a la implementación en un programa. Te daré ideas y código.

Idea:

El envío del WM_MSG correspondiente a la ventana especificada debe implementarse mediante la API SendMessage.

Implementación específica:

Función de declaración privada SendMessage Lib "user32" Alias ​​​​"SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

Función de declaración privada FindWindow Lib "user32" Alias ​​​​"FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

'Declaración API

Subcomando privado1_Click()

Atenuar a mientras

a=FindWindow(VBNull,"123")

Enviar mensaje a,WM_SETTEXT, 0,"new El título de "

End Sub

encuentra la ventana HWND y luego envía un mensaje WM_SETTEXT a la ventana especificada para modificar el título.