FrontPage VBA教程:ListFieldChoice对象

   
ListFieldChoice

包含关于选项域的信息。选项域在列表中提供一个下拉列表或多个单选按钮,从而允许用户从指定数目的选项中进行选择。

使用 ListFieldChoice对象

使用 ListFields.Item(index) 可以返回单个 ListFieldChoice对象,其中 index 是 fpFieldChoice 类型的域的名称或位置序号。

使用 ListFields.Add方法可以将 fpFieldChoice 类型的域添加到 ListFields集合中。下列示例将名为 NewChoiceField 的 fpFieldChoice 类型的新域添加到 ListFields集合中。使用AddChoice方法可以在列表中添加选项。使用Clear方法可以从列表中清除选项。


Sub DisplayChoice()
'Display choice
    Dim objApp As FrontPage.Application
    Dim objLstFlds As listFields
    Dim objFldChoice As ListFieldChoice
    Dim strName As String
    Set objApp = FrontPage.Application
    Set objLstFlds = objApp.ActiveWeb.Lists.Item(0).Fields
    strName = "NewChoiceField"
    'Add new field of type fpFieldChoice to list
    objLstFlds.Add Name:=strName, Description:="New Choice value Field", _
                   Fieldtype:=fpFieldChoice, Required:=True
    MsgBox "A new Field named " & strName & " was added to the list " & _
           objApp.ActiveWeb.Lists.Item(0).Name & "."
End Sub

上页:FrontPage VBA教程:ListField对象 下页:FrontPage VBA教程:ListFieldComputed对象

FrontPage VBA教程:ListFieldChoice对象

FrontPage VBA教程:ListFieldComputed对象 FrontPage VBA教程:ListFieldCounter对象
FrontPage VBA教程:ListFieldCurrency对象 FrontPage VBA教程:ListFieldDateTime对象
FrontPage VBA教程:ListFieldFile对象 FrontPage VBA教程:ListFieldInteger对象
FrontPage VBA教程:ListFieldLookup对象 FrontPage VBA教程:ListFieldMultiLine对象
FrontPage VBA教程:ListFieldNumber对象 FrontPage VBA教程:ListFields集合
FrontPage VBA教程:ListFieldSingleLine对象 FrontPage VBA教程:ListFieldTrueFalse对象
FrontPage VBA教程:ListFieldURL对象 FrontPage VBA教程:Lists集合
FrontPage VBA教程:MetaTags集合对象 FrontPage VBA教程:NavigationNode对象
FrontPage VBA教程:NavigationNodes集合对象 FrontPage VBA教程:PageWindowEx对象
FrontPage VBA教程:PageWindows集合对象 FrontPage VBA教程:Properties集合对象
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号