If e.Form.Controls("日期控件").Text = Nothing Then
--------
If e.Form.Controls("日期控件").Value = Nothing Then