word 2003中，如何使用 控件工具箱 里的 复选框？？

[luckyzhang]

在word的 视图-》 工具栏--》控件工具箱 里面，有个 “复选框”控件

将控件加入文档后，怎么样才能 使 别人 用鼠标点一下复选框的“口”，就自动 在“口”内 打钩

不知道怎么实现这个功能呢？？

各位帮帮忙，谢谢了。

[meteorfish]

设计控件时复选筐有一个属性是“（名称）”，假设它是CheckBox1，那么在Visual　Basic 编辑(ALT+F11)其中的Microsoft Word 对象中的ThisDocument里输入以下代码：

Dim A As Integer
Private Sub CheckBox1_Click()
A = (A + 1) Mod 2
If A = 1 Then
CheckBox1.Value = True
Else
CheckBox1.Value = False
End If
End Sub

然后回到文档，功能实现。

[luckyzhang]

高手啊，送分50，谢谢啦