以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教,这个公式哪儿错了?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=607)

--  作者:cpayinyuan
--  发布时间:2008/9/19 9:22:00
--  请教,这个公式哪儿错了?
我想在这个表中筛选日期的月份为1的记录,这个公式哪儿错了?注意在实际使用时我要把1用一个变量来代替.
Tables("表A").Filter=" [日期].month=1 "
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:筛选月份.table

[此贴子已经被作者于2008-9-19 9:24:22编辑过]

--  作者:狐狸爸爸
--  发布时间:2008/9/19 9:27:00
--  
哈哈,大错特错,先仔细看看表达式这一章的说明。
--  作者:狐狸爸爸
--  发布时间:2008/9/19 9:29:00
--  
表达式根本就没有month

只能:

[日期] >= #1/1/2008# And [日期] <= #1/31/2008#


如何取得每个月的第一天和最后一天,我记得帮助有说明的。
--  作者:cpayinyuan
--  发布时间:2008/9/19 9:32:00
--  
以下是引用狐狸爸爸在2008-9-19 9:29:00的发言:
表达式根本就没有month

只能:

[日期] >= #1/1/2008# And [日期] <= #1/31/2008#


如何取得每个月的第一天和最后一天,我记得帮助有说明的。

贺老师,,没有办法这样用,我前面说了,在实际运用的时候,这个月份值是一个变量,例如我想筛选日期的月份等于aa的记录(aa是一个整数型数量),该怎么办?


--  作者:shxiaoya
--  发布时间: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 & "#"

这个准备加入帮助了


--  作者:kylin
--  发布时间: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)


其他的相信楼主可以自己会写吧。


--  作者:cpayinyuan
--  发布时间:2008/9/19 10:30: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 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\')

[此贴子已经被作者于2008-9-19 10:45:16编辑过]