主题：求助

如果不是DateTimePicker,而是TextBox的话，如果你没有输入值，或者输入的值不是日期格式，就会出现这样的提示哦。
 
改一下代码：
 
if e.form.Controls("xxx").Value IsNot Nothing then
    Dim s As String = e.form.Controls("xxx").Value
    Dim v As Date 
    if Double.TryParse(s, v) then
             tables("yyy").Current("日期") = v
     end if
End if

http://www.foxtable.com/help/topics/0324.htm