- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]怎样给label控件赋一个值 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=42541)
-- 发布时间：2013/11/14 16:29:00
-- [求助]怎样给label控件赋一个值
怎样实现在label控件上显示 上个月最后一天的日期，或者直接在窗口里显示这个日期。
-- 发布时间：2013/11/14 16:31:00
--
Dim d As Date =Date.today.AddMonths(-1)
e.form.controls("Label1").Text=Date.DaysInMonth(d.Year,d.Month)
-- 发布时间：2013/11/14 16:34:00
--
谢谢，我忘了后面加Test,难怪总提示是只读，不能赋值。
-- 发布时间：2013/11/14 16:34:00
--
上面是天数，日期的话，改一下：
Dim dt As Date = Date.Today
dt = new Date(dt.Year,dt.Month,1)
dt = dt.AddMonths(-1)
e.Form.Controls("Label控件名称") = Format(dt,"yyyy-MM-dd")
-- 发布时间：2013/11/14 16:39:00
--
以下是引用狐狸爸爸在2013-11-14 16:34:00的发言：
上面是天数，日期的话，改一下：
Dim dt As Date = Date.Today
dt = new Date(dt.Year,dt.Month,1)
dt = dt.AddMonths(-1)
e.Form.Controls("Label控件名称") = Format(dt,"yyyy-MM-dd")
-- 发布时间：2013/11/14 16:40:00
--
谢谢，学习了！