FrontPage VBA教程:forms属性

返回 IHTMLElementCollection集合对象,该对象代表当前文档中所有表单的集合。

expression.forms

expression  必选。返回DispFPFPHTMLDocument对象的表达式。

说明

此集合先按名称索引,再按标识符索引。如果发现相同的名称,则返回具有该名称的项目的集合。相同名称的集合随后必须按位置序号进行引用。

VBA示例

下列示例返回当前文档中所有表单的集合。该子例程在集合中搜索名为 Project Name 的表单。如果找到该表单,则向用户显示其名称和索引值。


Sub ReturnForms()
'Returns the collection of forms in the document
    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument
    Dim objForms As IHTMLElementCollection
    Dim objForm As IHTMLFormElement
    Dim intCount As Integer
    intCount = 0
    Set objApp = FrontPage.Application
    Set objDoc = objApp.ActiveDocument
    'Create a reference to the forms collection
    Set objForms = objDoc.forms
    For Each objForm In objForms
        'If form is the project name form
        If objForm.Name = "Project Name Form" Then
            'Display name and position
            MsgBox "The form " & objForm.Name & " was found." & _
                   " It is positioned number " & intCount _
                   & " in the collection."
        End If
    'If not found, keep looking
    intCount = intCount + 1
    Next objForm
End Sub

上页:FrontPage VBA教程:Format属性 下页:FrontPage VBA教程:isDirty属性

FrontPage VBA教程:forms属性

FrontPage VBA教程:isDirty属性 FrontPage VBA教程:frames属性
FrontPage VBA教程:FrameWindow属性 FrontPage VBA教程:hasSharedBorders属性
FrontPage VBA教程:Home属性 FrontPage VBA教程:HomeNavigationNode属性
FrontPage VBA教程:HorizontalResolution属性 FrontPage VBA教程:htmlViewText属性
FrontPage VBA教程:ignoreSharedBorders属性 FrontPage VBA教程:images属性
FrontPage VBA教程:InNavBars属性 FrontPage VBA教程:IsDirty属性
FrontPage VBA教程:IsExecutable属性 FrontPage VBA教程:IsHiddenFoldersEnabled属性
FrontPage VBA教程:IsLinkBar属性 FrontPage VBA教程:IsOpen属性
FrontPage VBA教程:IsOrphan属性 FrontPage VBA教程:IsReadable属性
FrontPage VBA教程:IsRoot属性 FrontPage VBA教程:IsUnderRevisionControl属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号