- 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=12755)
-- 发布时间：2011/9/13 17:21:00
-- 初始值
狐爸。麻烦问一下。我希望开始日期控件的值默认为本月第一天，结束日期为本月最后一天。这个应该怎么办啊。
此主题相关图片如下：截图13.jpg
-- 发布时间：2011/9/13 17:53:00
--
窗口的AfterLoad事件：
e.form.Controls("StartDate").Value = 第一天
e.form.Controls("EndDate").Value = 最后一天
如果取得某月第一天和最后一天，留给你做练习，参考：
http://www.foxtable.com/help/topics/0265.htm
-- 发布时间：2011/9/13 18:16:00
-- 狐爸看不懂
狐爸看不懂。指定那个月份的我知道的。关键是要本月的。应该是变化的。比如现在是9月份就应该显示9月份的第一天和最后一天。下个月就应该是10月份的
[此贴子已经被作者于2011-9-13 18:22:23编辑过]
-- 发布时间：2011/9/13 18:23:00
-- 看不懂
-- 发布时间：2011/9/13 18:56:00
-- 怎么老是这个样子
怎么老是这个样子。半天没人采。行不行说句活啊。
-- 发布时间：2011/9/13 19:33:00
-- 早知道就不买了
早知道就不买foxteball了。垃圾啊
-- 发布时间：2011/9/13 19:41:00
--
你只发个图，有这样的回复已经不错了。
如果想及时得到解决，自己做示例。
帮忙是义务的，你无权这样指责别人。
-- 发布时间：2011/9/13 19:51:00
--
根据2楼链接帮助，稍加修改：
Dim d As Date = Date.Now
Dim Days As Integer = Date.DaysInMonth(d.Year,d.Month)
Dim d1 As Date = New Date(d.Year,d.Month,1)
Dim d2 As Date = New Date(d.Year,d.Month,Days)
e.Form.Controls("DateTimePicker1").Value = d1
e.Form.Controls("DateTimePicker2").Value = d2
-- 发布时间：2011/9/13 19:57:00
-- 谢谢老师
刚才不好意思，我还以为”狐狸爸爸“是拿工资的呢。实在不好意思。
-- 发布时间：2011/9/13 20:30:00
--
以下是引用张海兵在2011-9-13 19:57:00的发言：
刚才不好意思，我还以为”狐狸爸爸“是拿工资的呢。实在不好意思。
刚才不好意思，我还以为”狐狸爸爸“是拿工资的呢。实在不好意思。
2楼是留作业给你的，你不学习，想偷懒，还爱发牢骚。 而且连FoxTable 都错写成 foxteball。。。 不会是玩足球的吧。