Window.Caption 属性 (Project)
获取或设置项目窗口的标题栏中的文本。 读/写 String。
语法
表达式。标题
表达 一个代表 Window 对象的变量。
备注
当活动窗口处于最大化时,标题栏同时显示主窗口和活动窗口的标题,这两个标题用连字符分隔。 例如,如果主窗口的标题为"Microsoft Project",活动窗口的标题为"Project1.mpp",则标题栏在活动窗口处于最大化时显示"Project1.mpp - Microsoft Project"。
如果将 标题 属性设置为 空 ,则标题栏将显示的默认标题。 主窗口的默认标题为"Microsoft 项目"。
在只有一个窗口的项目中,该窗口的默认标题为该项目的文件名。 在打开多个窗口的项目中,每个窗口的默认标题为 name: n, 其中 name 是项目的文件名, n 是窗口的唯一编号。 例如,如果项目“Project1”的第二个窗口处于活动状态,则默认标题栏会显示“Project1.mpp:2 - Microsoft Project”。
示例
下面的示例提示用户更改活动窗口的标题。
Sub ChangeWindowCaption()
Dim Entry As String ' Caption entered by user
' Prompt user for a new caption.
Entry = InputBox$("Enter a new caption for the active window (enter 'reset' to set the caption to its default).")
' If user chooses the Cancel button, exit Sub procedure.
If Entry = Empty Then Exit Sub
' Set or reset the caption.
If Entry = "reset" Then
ActiveWindow.Caption = Empty
Else
ActiveWindow.Caption = Entry
End If
End Sub
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈