标题：如何用菜单筛选不同年度同一月份的数据？

1楼

rcsy001 发表于：2011/12/13 10:59:00

如何用菜单筛选不同年度同一月份的数据？

狐表提供的快捷菜单，指定时段，相同时段的菜单，都是指同年，同季，同月的筛选。

请教：如何增加一个菜单项，用于筛选不同年度同季，同月的数据。

2楼

狐狸爸爸 发表于：2011/12/13 11:10:00

不同年的同月：

Dim dt As Date = Tables("订单").current("日期")
Dim m As Integer = dt.month
Tables("订单").Filter = " SubString(Convert([日期],'System.String'),6,IIF(SubString(Convert([日期],'System.String'),7,1) In ('-','/'),1,2)) = '" & m & "'"

参考：

http://www.foxtable.com/help/topics/1285.htm

3楼

rcsy001 发表于：2011/12/13 11:39:00

如何取得当前表，当前列

如何判断当前列是否是日期列

然后才能用以上代码

Tables("订单").Filter 这个如何确定为当前表的Filter

= " SubString(Convert([日期],'System.String'),6,IIF(SubString(Convert([日期],'System.String'),7,1) In ('-','/'),1,2)) = '" & m & "'"

4楼

狐狸爸爸 发表于：2011/12/13 11:42:00

CurrentTable当前表。

With CurrentTable

Dim c As Col

c = .Cols(.ColSel) ' 返回当前列

End with

5楼

rcsy001 发表于：2011/12/13 15:11:00

同季度的表达式如何写呢？

6楼

狐狸爸爸 发表于：2011/12/13 16:06:00

没有办法

共6 条记录, 每页显示 10 条, 页签: [1]