主题：图片自动更新

 最后一个功能，就是要如果点检异常，那么备注信息栏里必须要有文字，不允许为空。

我根据您的指示，尝试使用了使用TextBox的Validate事件中写入代码：

效果是有的，但不我想要的。因为这个设置逻辑，必须首先要在“备注信息”里写入内容，保证内容非空，然后才能操作其它控件。

实际使用中，这个肯定是最后一个要输入的，因为你只要检查完了前面的项目，才知道是不是正常，需不需要写入备注。一开始就强行要求写入，逻辑上不合理。

不知道有没有可能实现这样的功能？

变通的办法是弹出对话框，让操作员先在备注信息里输入正常，点检结束后再根据情况改正。但这样的办法很别扭

 版主：

我尝试新增一个按钮，在Click事件中写如下代码，但好像不起作用，在点检结果为“异常”时，即使“备注信息”为空，点击按钮后，仍然执行了保存，并没有弹出对话框提醒。

此主题相关图片如下：逻辑判断.png

感谢指点，谢谢。

if e.form.controls(某控件).text = "" then

msgbox(控件值为空)

end if

抱歉，版主，是我的失误。我在“数据录入”窗口新增了“保存修改”按钮，Click事件中写入如下代码：

但仍然不起作用，没有在“备注信息”中输入内容，后台仍然可以将内容至保存记录表，没有提示对话框。后台记录数据这个我能理解，关键是没有弹出对话框，也没有强制不能关闭当前页面，这个比较糟糕。

即使单独使用测试代码，仍然不能弹出对话框：

With Tables("Forklift")
    If e.Form.Controls("备注信息").text="" Then
        MessageBox.show("备注信息不能为空")
    Else
        .Current.Save()
    End If
End With

而且在测试中，我发现尽管点击了“异常”单选按钮，但当鼠标焦点移到至“备注信息”文本框后，选择就消失了，显示两个单选按钮都没有选中。是不是因为这个原因，所以程序就没有执行逻辑？

此主题相关图片如下：单击按钮1.png

请版主指点。

谢谢。

 版主：

方案二亲测有效，方案一不行。

感谢支持，后续的工作有眉目了，谢谢。