ListFieldNumber |
包含关于在 Microsoft FrontPage 列表域中如何显示数字的信息。ListFieldNumber 对象允许您配置 FrontPage 列表中数字的显示方式。
使用 ListFields.Item(index) 可以返回单个 ListFieldNumber 对象,其中 index 是 fpFieldNumber 类型的域的名称或位置序号。
使用 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