Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" ( _ ByVal hwnd As Long, _ ByVal lpString As String) As Long
SetWindowText изменяет текст для заданного окна.
' Устанавливаем новый заголовок для окна Form1
SetWindowText Form1.hWnd, "Русский_Проект"