你的内部表还是外部表,如果是内部表,在BeforeLoadInnerTable设置代码,就可以只加载当月的数据: If e.DataTableName = "这个表的名称" Then e.Filter = "会员 = True And 付款 = True & 月份 = " Date.Today.Month End If 上面的代码假定月份是整数型,如果是字符型: If e.DataTableName = "这个表的名称" Then e.Filter = "会员 = True And 付款 = True & 月份 = '" Date.Today.Month & "'" End If
|