如题所述：

请教：明明是逻辑格式，为什么运行“审批”的时候会弹出不是Boolean型？

此主题相关图片如下：审核.bmp

主管审核：

If User.Group = "主管" Then
    Tables("出入库管理表").Current("主管审核") = UserName
    Tables("出入库管理表").Current("审核日期") = Date.Today()
    Tables("出入库管理表").Current.Save()
Else
    MessageBox.show("警告!你无审核权限!")
End If

取消审核：

If User.Group = "主管" Then
    If Tables("出入库管理表").Current.IsNull("总监审核") Then
        Tables("出入库管理表").Current("主管审核") = Nothing
        Tables("出入库管理表").Current("审核日期") = Nothing
        Tables("出入库管理表").Current.Save()
    Else
        MessageBox.Show("此行已被批准,不能取消审核!")
    End If
Else
    MessageBox.show("你无取消审核权限!")
End If

总监批准：

If User.Group = "总监" Then
    If Tables("出入库管理表").current.IsNull("主管审核") Then
        MessageBox.Show("不能批准还未通过审核的行.")
    Else
        Tables("出入库管理表").Current("总监审批") = UserName
        Tables("出入库管理表").Current("批准日期") = Date.Today()
        Tables("出入库管理表").Current.Save()
    End If
Else
    MessageBox.show("你无批准权限!")
End If

取消批准

If User.Group = "总监" Then
    Tables("出入库管理表").Current("总监审核") = Nothing
    Tables("出入库管理表").Current("批准日期") = Nothing
    Tables("出入库管理表").Current.Save()
Else
    MessageBox.show("警告!你无取消批准权限!")
End If

已经改过了  这一点没注意到  谢谢甜大！

但是填写好之后，名称无法显示？

按照程序应该是可以显示：审核人名字的……现在显示是一串数字（其他都正常）

审核主管（用户角色也已经设定为审核了），不知道为什么无法显示名字呢？

改完user.name后好了审核的  审批的还是不行  真DT……我再试试把

非常感谢Bin大的解答！