【发布时间】:2015-02-20 18:04:42
【问题描述】:
我创建了一个用户表单并添加了一个名为“DSSSContact”的检查框。我已经编写了一些代码来检查用户表单的内容,然后保存在以下子中:
Private Sub SaveandClose_Click()
当表单被初始化时,复选框被设置为灰色但被勾选——我认为这意味着该值为空。 SavandClose 子代码包括以下内容,我认为可以确保复选框设置为 true 或 false:
If DSSSContact = Null Then
MsgBox "DSSS Contact Test"
Exit Sub
End If
但是,当我使用保存和关闭命令按钮保存和关闭表单而没有在复选框上进行选择时,表单会保存内容而不触发消息框。我为验证文本框和组合框是否已填充而创建的所有其他检查工作正常。我还在同一个 sub 中添加了以下代码:
Debug.Print Me.DSSSContact.Value
这会在即时窗口中打印 null
非常感谢任何帮助。谢谢
【问题讨论】: