Private Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long 9 b: D' h: R9 |7 [% R. L3 \
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long& S+ r. O0 U- m" Q- c
) r8 y7 \- u. D8 a. q4 R) d# ?
Sub MT() 9 N! _6 g$ P" H E! ^$ n
SetWindowText FindWindow("OpusApp", vbNullString), "改着玩玩" ; Q! u3 J1 R$ b \/ L6 ~6 W/ z