Access delimits dates with #, so I used that as a sample
Code:
If txtBx.Text = "" Then
s = "NULL"
Else
s = " #" & txtBx.Text & "# "
End If
MyCnctn.Execute "UPDATE TheTable ( TheDateField ) " & _
"Values ( " & s & " ) ", , _
adCmdText
Just a simple sample to give you a possible solution approach.