关于组合框赋值及自动更新问题

winner

问题1：

在组合框中选择2005-1，则组合框自动赋值到2个文本框的数据是2005-1-1，2005-1-31

若2005－2，则对应2005－2－1，2005－2－28（29）……如何实现？还有应怎样判断2月有无29日？

问题2：

假设当表1有2005－6，而表二无6月整个月的数据时，组合框不显示2005－6，要输入2005－6－30的数据后，组合框中2005－6才显示出来，能否实现这一功能？

fan0217

这里的日期函数对你有帮助：http://www.office-cn.net/forum.php?mod=viewthread&tid=33813

然后在更新后事件中为其他控件赋值。

winner

我比较蠢啦，再问问：我看到网址里好像没有我想要的函数。

其实如果代码用Case的话，可以实现要求，只不过每次增加年月，就要改代码，麻烦！所以想找一种好的办法给2个文本框赋值。有无这方面的例子啊？

fan0217

计算天数及月初月末日期



Function 本月天数(日期 As Date) As Byte
本月天数 = DateSerial(Year(日期), Month(日期) + 1, Day(日期)) - 日期
End Function







Function 月末(日期 As Date) As Date
月末 = DateSerial(Year(日期), Month(日期) + 1, 1) - 1
End Function











Function 月初(日期 As Date) As Date
月初 = 日期 - Day(日期) + 1
End Function

winner

我是想知道如何选中组合框的2005-2,就自动把代码写入文本框?

如果用Function 月末(日期 As Date) As Date
月末 = DateSerial(Year(日期), Month(日期) + 1, 1) - 1
End Function ,那怎么知道是查询2月份的呢?

如果输入日期,那是否意味着每个月份(2005-3,2005-4)都要写这段代码啊?

winner

顶^^^^^^

请大家在看看上面的问题,还没解决啊!

重复问题:
我想在组合框选择2005-1,就能打开1月份的报表,选择2005-2,就打开2月份的报表,如此类推,
请问该如何做呢?
我想过用Case,不过这样的话如果新增一个月份,就要改代码一次,麻烦!所以看看大家有什么办法解决.

先谢谢了!

winner

每天一顶^^^^^^^^到问题解决为止(我是很有决心的,一定要弄清这个问题)

zhengjialon

以下是引用winner在2006-1-25 11:25:00的发言：


顶^^^^^^

请大家在看看上面的问题,还没解决啊!

重复问题:
我想在组合框选择2005-1,就能打开1月份的报表,选择2005-2,就打开2月份的报表,如此类推,
请问该如何做呢?
我想过用Case,不过这样的话如果新增一个月份,就要改代码一次,麻烦!所以看看大家有什么办法解决.

先谢谢了!

这个问题可以这样解决:



在报表的数据源中新设两个字段:YEAR([日期]) AS 年份,MONTH([日期]) AS 月份

然后报表的打开条件分别设成你的年份和月份就可以了.

winner

可是按要求报表的数据源只有一个DATE,不能分开设哦,详细数据库请看第一个问题框框

zhengjialon

我是日文看不了附件的,

年份和月份可以从一个DATE字段生成,如:

YEAR([DATE]) AS 年份,MONTH([DATE]) AS 月份,再对这两新的字段来做筛选就可以了.