ListFieldNumber 对象

         
ListFieldNumber

包含关于在 Microsoft FrontPage 列表域中如何显示数字的信息。ListFieldNumber 对象允许您配置 FrontPage 列表中数字的显示方式。

使用 ListFieldNumber 对象

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

使用 ListFields.Add 方法可以将 fpFieldNumber 类型的域添加到 ListFields 集合中。下列示例将名为 Total 的 fpFieldNumber 类型的新域添加到 ListFields 集合中。该子例程显示了新域的名称以及将此域添加到的列表的名称。

使用 ListFieldNumber 对象的 DisplayFormat 属性可以更改数据在域中的显示方式。

Sub CreateNumberField()
'Add new MultiLine Field
    Dim objApp As FrontPage.Application
    Dim objLstFlds As ListFields
    Dim strName As String

    Set objApp = FrontPage.Application
    Set objLstFlds = objApp.ActiveWeb.Lists.Item(0).Fields
    strName = "Total"
    'Add new Field of type fpFieldNumber to list
    objLstFlds.Add Name:=strName, Description:="Numeric Total Field", _
                   Fieldtype:=fpFieldNumber
    MsgBox "A new field named " & strName & " was added to the list " & _
           objApp.ActiveWeb.Lists.Item(0).Name & "."

End Sub