在使用vba访问时在日期字段中插入空值

我试图在表中使用vba在表中插入日期到另一个表中，但表中的一个日期值为空。所以，当插入日期到新表时，它显示无效的异常使用运行时错误94。在使用vba访问时在日期字段中插入空值

2014-10-29 Cherry

我想我弄明白了，把变量声明为字符串。然后检查表中的值是否为空，然后将null分配给它。否则，从表中分配值。

例如

Dim newdate As String

检查是否取的值是空或不是

If IsNull(rst![value]) Then 
      newdate = "null" 
    Else 
      newdate = rst![value] 
    End If

2014-10-29 15:21:50 Cherry

您可以使用NZ（）函数来定义应该使用的值而不是NULL。内部日期是浮点值，其中数字表示从01.01.1900到应该存储的日期之间的天数。小数点后面的部分表示小时/分钟（例如.25，上午6点）。所以你可以使用NZ（）函数来替换NULL bei 0（将被解释为01.01.1900）。

另一种解决方案是以允许NULL值的方式配置目标表。您可以在表格的设计视图中轻松完成此操作。

2014-10-29 14:50:04 cboden

我已将所需的字段状态设置为no.Still不起作用。如果没有要插入的值，是否可以将字段留空？ – Cherry 2014-10-29 14:55:18

您必须更改表格设计中字段的“requiered”属性。 – cboden 2014-10-29 15:12:13

感谢您的帮助。 – Cherry 2014-10-29 15:22:21

我遇到了这个问题，并解决了这种方式。

SQL = "update mytable set mydatefield = '" & txtdate & "'"

在txtdate的形式，把一个日期格式，以确保日期可以是一个真正的日期或只是空白。

2016-06-03 15:32:19

回答