一、通过属性窗口修改（推荐）
设计时修改 在设计界面时，双击窗体空白处进入代码窗口，在`Load`事件中设置`Caption`属性：
```vb
Private Sub Form_Load()
Me.Caption = "新窗口名称"
End Sub
```
此方法适用于仅需修改单个窗口名称的情况。
运行时修改
运行程序后，通过属性窗口修改：
单击窗体任意位置打开属性窗口；
在`Caption`属性处输入新名称并保存。
二、通过资源管理器修改（适用于多个窗口重命名）
文件名修改
在资源管理器中找到`.frm`文件（如`Form1.frm`），直接重命名文件名即可。注意：
重命名后需在工程资源管理器中更新对应名称；
若使用IDE（如VS），需在“项目资源管理器”中右键选择“重命名”。
三、使用Windows API动态修改（高级需求）
通过`SendMessage`函数可动态更改其他窗口标题（需注意权限和窗口句柄获取）：
```vb
Private Declare PtrSafe Function SendMessage Lib "user32" Alias "SendMessageA" ( _
ByVal hwnd As LongPtr, ByVal Msg As Long, ByVal wParam As Long, lParam As LongPtr) As LongPtr
Private Declare PtrSafe Function FindWindow Lib "user32" Alias "FindWindowA" ( _
ByVal lpClassName As String, ByVal lpWindowName As String) As LongPtr
Private Sub ChangeWindowTitle(ByVal newTitle As String)
Dim hwnd As LongPtr = FindWindow(nil, "目标窗体标题")
If hwnd <> 0 Then
SendMessage(hwnd, WM_SETTEXT, ByVal newTitle.Length As Long, ByVal ByVal newTitle As String)
Else
MsgBox "未找到目标窗口", vbExclamation
End If
End Sub
```
注意事项 需在代码中指定目标窗口的精确标题； 仅适用于同一进程内的窗口操作； 运行权限可能受限，建议用于调试或自动化脚本。 四、注意事项 类名与实例名区分： 属性窗口修改的是`Caption`（显示标题），而窗体文件名或类名需通过工程资源管理器或代码修改； 多窗体工程
建议优先使用属性窗口修改，简单且适用于大多数场景。若需批量修改或动态操作，可结合API或第三方工具。