在 Word 2010 中修改文本框的复选框答案

【问题标题】：Checkbox to modify textbox in Word 2010在 Word 2010 中修改文本框的复选框
【发布时间】：2012-02-10 08:08:24
【问题描述】：

我想要一个 MS Word 2010 文档，其中有一个复选框 (ckeckable) 和一个文本框 (textfield)，其中根据是否单击复选框显示不同的文本。

我已尝试搜索它，但不知何故，所有建议都不能作为复选框问题的解决方案...

我认为应该在 Visual Basic 中使用该解决方案？

【问题讨论】：

【解决方案1】：

这样的？

Private Sub CheckBox1_Change()
    If CheckBox1.Value = True Then
        TextBox1.Text = "Checked!"
    Else
        TextBox1.Text = "Unchecked."
    End If
End Sub

这假设您有一个名为 CheckBox1 的复选框和一个名为 TextBox1 的文本框。上面的代码在 ThisDocument 模块中。

结果类似于和。

编辑哎呀，我在 Excel 中制作了这些图片...哦，它们在 Word 中看起来几乎相同。

编辑您现在已经更改了要求，并希望在取消选中复选框时“隐藏”文本框。没有正式的方法可以“隐藏”文本框，但您可以删除它的可见特征，即它包含的文本以及“凹陷”特殊效果，使其与背景无法区分：

Private Sub CheckBox1_Change()
    If CheckBox1.Value = True Then
        TextBox1.Text = "Checked!"
        TextBox1.SpecialEffect = fmSpecialEffectSunken
    Else
        TextBox1.Text = ""
        TextBox1.SpecialEffect = fmSpecialEffectFlat
        'Textbox is now "invisible"
    End If
End Sub

【讨论】：

是的，类似的东西，但是当我想打印它时，盒子仍然在纸上留下空白空间 - 可以用“不活动时隐藏的盒子”解决吗？或类似的东西？
刚刚测试过，它打印对我来说很好...复选框打印了吗？顺便说一句，如果您觉得这个答案有用，请记得点击左侧的复选标记接受它。
嗨 Jean，Francis，我希望在复选框未标记时隐藏文本框并在选中时显示，你知道怎么做吗？如果是这样，我会很乐意回答 botton :-)
我现在已经编辑了我的答案以反映这一新要求，但将来请避免拉这种诱饵和开关。如果答案回答了您的问题，请接受它。如果您有新问题，请提出新问题。人们会提供帮助。
我已经发布了另一个问题 - 我相信你也知道那个问题的答案.....