vars("Suma") = DataTables("收购").Compute("Sum(头数)", "[日期] >= #" & Vars("vdate") & "# and [日期] <= #" & Vars("edate") & "#")
vars("Sumb") = DataTables("收购").Compute("Sum(重量)", "[日期] >= #" & Vars("vdate") & "# and [日期] <= #" & Vars("edate") & "#")
vars("Sumc") = DataTables("收购").Compute("Sum(收购金额)","[日期] >= #" & Vars("vdate") & "# and [日期] <= #" & Vars("edate") & "#")
vars("Sumaa") = DataTables("销售").Compute("Sum(份数)", "[日期] >= #" & Vars("vdate") & "# and [日期] <= #" & Vars("edate") & "#")
vars("Sumbb") = DataTables("销售").Compute("Sum(重量)", "[日期] >= #" & Vars("vdate") & "# and [日期] <= #" & Vars("edate") & "#")
vars("Sumcc") = DataTables("销售").Compute("Sum(金额)", "[日期] >= #" & Vars("vdate") & "# and [日期] <= #" & Vars("edate") & "#")
限制当日期不在范围内时如何用Messagebox提示？
加好友 
发短信
Post By：2013/12/26 16:51:00 [只看该作者]
