vb6.0怎么修改access数据库中指定位置的数据？
数据库格式如下：

ID JOB 接收 完成 暂停
1 235 10：52：33 11：52：33
2 225 10：58：33 11：52：33
3 123 10：59：10 11：58：10

AdoDatazt.Open "Select * From data Where JOB='" & Text1.Text & "'", db, adOpenStatic, adLockOptimistic
If AdoDatazt.Fields("暂停") Is Null Then
AdoDatazt.Fields("暂停") = Now()
else
AdoDatazt.Fields("暂停") = ""
enf if

现在有2个问题：
1、判断语句If AdoDatazt.Fields("订单暂停") Is Null Then，说是错的
2、清空暂停记录，怎么赋值呢？格式是时间，直接""好象不对？



[解决办法]

VB code

AdoDatazt.Open "Select * From data Where JOB='" & Text1.Text & "'", db, adOpenStatic, adLockOptimisticIf isnull(AdoDatazt.Fields("暂停")) Then  AdoDatazt.Fields("暂停") = Now()else  '本身就是NULL了，无需赋值  'AdoDatazt.Fields("暂停") = ""enf if