说明这个条件永远满足 If Tables("订单表").Current.Isnull("已结帐") = False Then
1、这样写 Tables("订单表").Current("已结帐") = True
2、看表名是不是写错了,可能是副本表