Dim StartDate1 As Date = e.Form.Controls("日期").Value
If startDate = nothing Then
StartDate1 = Date.today()
End If