这是我程序中的审批功能的代码，我的目的是先判断表中 文件数量、盖章、文件要求、发图方式 四列中的内容，如果为空，提示“请确定文件数量、盖章、文件要求、发图方式等内容！”，如果不为空那就完成审核签字。
我写程序提示 e.DataCol不能按钮中运行，老大咋办？
If e.DataCol.Name = "文件数量" Then
If e.NewValue Is Nothing Then
MessageBox.Show("请确定文件数量、盖章、文件要求、发图方式等内容！", "提示")
Else
If User.Group = "项目负责人" Then
Tables("ftdjb").Current("审核") = User.Name
Tables("ftdjb").Current("审核日期") = Date.Today()
Tables("ftdjb").Current.Save()
Else If User.Group = "计划" Then
Tables("ftdjb").Current("审核") = User.Name
Tables("ftdjb").Current("审核日期") = Date.Today()
Tables("ftdjb").Current.Save()
Else
MessageBox.show("你无审核权限!")
End If
End If
End If
加好友 
发短信
Post By：2022/5/12 13:57:00 [只看该作者]
