如何把空值写入MS-SQL数据库表里money类型?

Question

Adodc1.Recordset.Fields("Item6") = Text2(6)
因Text2(6)没有数据而报"实时错误.......多步操作产生错误,请检查每一步状态值"错,
请问这问题如何解决?

Answer 1

if strim(tex2(6).text)="" then
   adodc1.recordset.fields("ITEM6")=NULL
else
   Adodc1.Recordset.Fields("Item6") = Text2(6) 
endif

Answer 2

if strim(tex2(6).text)=vbNullSting then  
  adodc1.recordset.fields("ITEM6")=NULL 
else 
  Adodc1.Recordset.Fields("Item6") = Text2(6) 
endif

Answer 3

没有不就是0吗，钱也要搞NULL?