经过几天努力的成果，跟大家分享一下

roych

应该加上错误处理……例如，没有数据录入时，点击“录入”按钮应该exit sub或者弹出错误提示等等。

roych

zhidao 发表于 2015-1-22 14:40
Private Sub Command5_Click()
If Me.管线号 = Null Then Exit Sub （我在代码里加了这句，还是不行）
...

这样写：
if
'空值退出
else
'ADO语句操作
end if

roych

或者可以根据q和k的值来判断。
If q > 0 And k > 0 Then
'执行ADO语句
end if
当然，也可以设置控件有效性（属性\数据\有效性规则）。一开始没法要求那么完美，很多东西都是慢慢地调试出来的。