自动按月份搜索 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师，我用下面的代码实现了按登录日期执行不同的代码，我想变通一下，按登录月份自动显示当前月的内容，请您指导

Select Case Date.today.day

Case 1

Tables("当月考勤表2").SetColVisibleWidt.......

End Select

我有个想法，是否和下面类似的代码结合起来，以月份为基准，筛选当月的

'-------------------------------筛选-------------------------------

Dim s As String = user.name

With DataTables("当月考勤表2")

.loadfilter = "考勤员 like '%" & s & "%'"

.load()

End With

主题：自动按月份搜索