Description 属性

返回或设置 String 类型的值，该值代表当前列表的说明。该说明出现在默认查看网页上列表的标题之下。可读写。

expression  必选。返回“应用于”列表中的对象之一的表达式。

示例

下列示例提示用户输入集合中第一个列表的说明。Description 属性根据用户的输入更改。

Sub SetDescription()
'Set the list description

    Dim objApp As FrontPage.Application
    Dim objWeb As WebEx
    Dim lstWebList As List
    Dim StrDesc As String

    Set objApp = FrontPage.Application
    Set objWeb = objApp.ActiveWeb
    'Reference first list in collection
    Set lstWebList = objWeb.Lists.Item(0)
    'Get new description from user
    StrDesc = InputBox("Enter a new description for the list " & _
              lstWebList.Name & ".")
    'Set description property
    lstWebList.Description = StrDesc

End Sub