如果需要使用空值,请使用Variant数据类型,使用Nz()函数指定要用于Null的值。
在VBA中,唯一可以包含Null的数据类型是Variant。当字段的值分配给非变量时,都必须考虑该字段可能为空的可能性。
第一步:连接数据库,下面是参考代码Set conn = CreateObject("ADODB.Connection")
conn.ConnectionString = "Provider=Microsoft.Ace.OleDB.12.0Data Source=" &mypath
conn.ConnectionString = conn.ConnectionString &"Jet OLEDB:Database Password=1"
conn.Open
第二步:插入数据,参考代码如下:
Sql = "insert into skmxb (内部管理号,收款日期,金额"
Sql = Sql &") values ('" &nbglH &"', #" &Format(myD, "yyyy/mm/dd") &"#,"
Sql = Sql &jE
Sql = Sql &")"
conn.Execute Sql
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)