Mira estas Apis:
Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long
Pero primero, tienes que obtener el Handle de la Ventana a modificar, para hacer esto, usa esta Apis:
Declare Function GetForegroundWindow Lib "user32" Alias "GetForegroundWindow" () As Long