請問vb6中資料欄位為date時,欲填入空值應如何處理(編號:555)

請問vb6中資料欄位為date時,欲填入空值應如何處理,格式為何
例:rs.Fields("日期") = .........