Word VBA教程:CheckBox对象

   
FormFields (FormField)
CheckBox

代表一个复选框窗体域。

使用 CheckBox对象

用 FormFields(index) 可返回单个 FormField对象,其中 index 是复选框的索引序号或书签名。用 FormField对象的CheckBox属性可返回一个 CheckBox对象。下列示例从活动文档中选定名为“Check1”复选框类型的窗体域。


ActiveDocument.FormFields("Check1").CheckBox.Value = True

索引序号代表一个窗体域在FormFields集合中的位置。下列示例判断第一个窗体域的类型:如果是复选框类型,则选中该复选框。


If ActiveDocument.FormFields(1).Type = wdFieldFormCheckBox Then
    ActiveDocument.FormFields(1).CheckBox.Value = True
End If

下列示例先判断 ffield对象是否有效,然后再将复选框大小修改为 14 磅。


Set ffield = ActiveDocument.FormFields(1).CheckBox
If ffield.Valid = True Then
    ffield.AutoSize = False
    ffield.Size = 14
Else
    MsgBox "First field is not a check box"
End If

用 FormFields对象的Add方法可添加一个复选框型窗体域。下列示例在活动文档开始处添加一个复选框,取名为“Color”,并选中该复选框。


With ActiveDocument.FormFields.Add(Range:=ActiveDocument.Range _
    (Start:=0,End:=0), Type:=wdFieldFormCheckBox)
    .Name = "Color"
    .CheckBox.Value = True
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号