Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" ( _ ByVal lpClassName As String, _ ByVal lpWindowName As String) As Long Declare Function SetWindowText Lib "user32.dll" Alias "SetWindowTextA" ( _ ByVal hwnd As Long, _ ByVal lpString As String) As Long dim whandle as long whandle=findwindow(vbnullstring,caption) call setwindowtext(whandle,"你要的caption")
ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long
Declare Function SetWindowText Lib "user32.dll" Alias "SetWindowTextA" ( _
ByVal hwnd As Long, _
ByVal lpString As String) As Long dim whandle as long
whandle=findwindow(vbnullstring,caption)
call setwindowtext(whandle,"你要的caption")
这个可执行文件包含两个功能 1、打开原来的.exe,2、把XX.dll加载到.exe的进程中
在xx.dll中的入口部分写
findwindow目标窗体
setwindowtext修改目标窗体的caption这里相对麻烦的是XX.dll加载到.exe的进程中,这些代码网上多如牛毛。