- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 请教，这个公式哪儿错了？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=607)
-- 发布时间：2008/9/19 9:22:00
-- 请教，这个公式哪儿错了？
我想在这个表中筛选日期的月份为1的记录，这个公式哪儿错了？注意在实际使用时我要把1用一个变量来代替.
Tables("表A").Filter=" [日期].month=1 "
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:筛选月份.table |
-- 发布时间：2008/9/19 9:27:00
--
哈哈，大错特错，先仔细看看表达式这一章的说明。
-- 发布时间：2008/9/19 9:29:00
--
表达式根本就没有month
只能：
[日期] >= #1/1/2008# And [日期] <= #1/31/2008#
如何取得每个月的第一天和最后一天，我记得帮助有说明的。
-- 发布时间：2008/9/19 9:32:00
--
表达式根本就没有month
只能：
[日期] >= #1/1/2008# And [日期] <= #1/31/2008#
如何取得每个月的第一天和最后一天，我记得帮助有说明的。
贺老师,,没有办法这样用,我前面说了,在实际运用的时候,这个月份值是一个变量,例如我想筛选日期的月份等于aa的记录(aa是一个整数型数量),该怎么办?
-- 发布时间：2008/9/19 9:39:00
--
增加个月份列
-- 发布时间：2008/9/19 9:42:00
--
多看几次帮助，这样的代码就可以轻松写出来：
Dim StartDate As Date
Dim EndDate As Date
Dim Month As Integer = 6 \'指定月份
Dim Year As Integer = 1999 \'指定年份
StartDate = New Date(Year,Month,1)
EndDate = New Date(Year,Month,Date.DaysInMonth(Year,Month))
Tables("订单").Filter = "[日期] >= #" & StartDate & "# And [日期] <= #" & EndDate & "#"
这个准备加入帮助了
-- 发布时间：2008/9/19 9:47:00
--
提示
每个月的第一天和最后一天
Dim FirstDay As Date = New Date(today().Year,aa,1)
Dim LastDay As Date = New Date(today().Year,aa,Days)
其他的相信楼主可以自己会写吧。
-- 发布时间：2008/9/19 10:30:00
--
多看几次帮助，这样的代码就可以轻松写出来：
Dim StartDate As Date
Dim EndDate As Date
Dim Month As Integer = 6 \'指定月份
Dim Year As Integer = 1999 \'指定年份
StartDate = New Date(Year,Month,1)
EndDate = New Date(Year,Month,Date.DaysInMonth(Year,Month))
Tables("订单").Filter = "[日期] >= #" & StartDate & "# And [日期] <= #" & EndDate & "#"
这个准备加入帮助了
已经明白了，谢谢贺老师，也谢谢楼上几位热心的老兄。只是，我对哪些函数和方法能在表达式中使用，哪些不能在表达式中使用，还是有些含糊，帮助中说得也不够详细，希望帮助中能够说得再详细一些。
-- 发布时间：2008/9/19 10:30:00
--
表达式能用的函数，帮助有说明的。
-- 发布时间：2008/9/19 10:45:00
--
如果要增加一个月份列，可以用下面的表达式计算月份：
Convert(IIF(SUBSTRING(Convert([日期], \'System.String\'),7,1) = \'-\', SUBSTRING(Convert([日期], \'System.String\'),6,1),SUBSTRING(Convert([日期], \'System.String\'),6,2)),\'System.Int16\')