Dim dt As Date
Dim Year As Integer = e.Form.Controls("日期输入框").Value
Dim sd1 AS Date = New Date(Year,1,1)
Dim sd2 AS Date = New Date(Year,12,32)
dt = DataTables("表A").Compute(“Max(日期)”,"日期>= #" & sd1 & "# And 日期 < #" & sd2 & "#")
加好友 
发短信
Post By：2015/10/25 16:10:00 [显示全部帖子]
