[attach]44828[/attach]窗体的数据源为“考勤记录表”，“员工”字段数据类型为数字型 ，为何录入数据时，如果员工保留为空，当日期数据录入后用如下两种办法均不能对“员工”组合框进行空值判别，请问，在保留“员工”组合框数据源设置不变的情况下，如何修改代码才能达到目的？
Private Sub 开始日期_AfterUpdate()
'If Not IsNumeric([员工]) Then '数字型值判断
If IsNull(Me.员工) Then
MsgBox "注意，请假员工的姓名你没有输入！", vbExclamation + vbOKOnly, "温馨提示"
Me.员工.SetFocus
Else
If CVDate([开始日期]) > Date Then
MsgBox "注意，开始日期不能大于当前日期，请重新确认！", vbExclamation + vbOKOnly, "温馨提示"
Me.开始日期 = ""
Me.开始日期.SetFocus
End If
End If
作者: todaynew 时间: 2011-2-14 16:03
以下三种均可：
If IsNumeric([员工]) = False Then
If IsNull(Me.员工)=True Then
If Nz(Me.员工,0)=0 Then 作者: ycxchen 时间: 2011-2-14 16:29
十分感谢版主指教！我试过，只有写入If Nz(Me.员工,0)=0 Then语句可以达目的。
作者: ycxchen 时间: 2011-2-14 16:49
再请教：在本例子中，录入一条新记录如发现有错点击“删除记录”后再点击“返回”，运行If NewRecord Then 语句，发现ACCESS仍然算是新记录的，我不明为何新记录删除后仍为新的？