FrontPage VBA教程:Fields属性

返回ListFields集合,该集合代表当前列表中的所有域。ListFields集合包含与列表成员文档的列属性相对应的ListField对象。

expression.Fields

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

VBA示例

下列示例显示 Lists集合第一个列表中的所有域名。


Sub DisplayFields()
'Returns the fields collection
    Dim objApp As FrontPage.Application
    Dim lstWebList As List
    Dim lstFields As ListFields
    Dim lstField As ListField
    Dim StrName As String
    Set objApp = FrontPage.Application
    Set lstWebList = objApp.ActiveWeb.Lists.Item(0)
    Set lstFields = lstWebList.Fields
    If Not ActiveWeb.Lists Is Nothing Then
        For Each lstField In lstFields
                'add URLs to string
                If StrName = "" Then
                    'If empty string
                    StrName = lstField.Name & vbCr
                Else
                    'add names to string
                    StrName = StrName & lstField.Name & vbCr
                End If
        Next
        'Display formatted string
        MsgBox "The list " & lstWebList.Name & _
               "contains the following fields" & vbCr & vbCr & _
               StrName
    Else
      'Otherwise display message to user
        MsgBox "The current web contains no lists."
    End If
End Sub

上页:FrontPage VBA教程:fgColor属性 下页:FrontPage VBA教程:File属性

FrontPage VBA教程:Fields属性

FrontPage VBA教程:File属性 FrontPage VBA教程:fileCreatedDate属性
FrontPage VBA教程:FileDialog属性 FrontPage VBA教程:FileDialogViewPage属性
FrontPage VBA教程:fileModifiedDate属性 FrontPage VBA教程:Files属性
FrontPage VBA教程:FileSaveForm属性 FrontPage VBA教程:FileSearch属性
FrontPage VBA教程:fileSize属性 FrontPage VBA教程:fileUpdatedDate属性
FrontPage VBA教程:Folder属性 FrontPage VBA教程:Folders属性
FrontPage VBA教程:Format属性 FrontPage VBA教程:forms属性
FrontPage VBA教程:isDirty属性 FrontPage VBA教程:frames属性
FrontPage VBA教程:FrameWindow属性 FrontPage VBA教程:hasSharedBorders属性
FrontPage VBA教程:Home属性 FrontPage VBA教程:HomeNavigationNode属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号