请问老师怎么统计本年和本月 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

此主题相关图片如下：qq图片20180223150732.png

请问老师，我要设置个统计窗口，请问怎么统计本年和本月的数据和，

但是在帮助里只看到删选本月数据的，请问删选出来了怎么求和呢

筛选本月数据

例如筛选本月的订单：

Dim y As Integer = Date.Today.Year
Dim m As Integer = Date.Today.Month
Dim dt1 As New Date(y, m, 1)
Dim dt2 As New Date(y, m, Date.DaysInMonth(y, m)) '获取本月的最后一天
Dim Filter As String
Filter = "日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#"
Tables("订单").Filter = Filter

主题：请问老师怎么统计本年和本月