Foxtable(狐表)用户栏目专家坐堂 → DateTimePicker


  共有1317人关注过本帖树形打印复制链接

主题:DateTimePicker

美女呀,离线,留言给我吧!
longyanlin
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:151 积分:1469 威望:0 精华:0 注册:2016/5/12 14:53:00
DateTimePicker  发帖心情 Post By:2017/3/12 7:59:00 [只看该作者]

请教打开窗口后DateTimePicker1如何默认为本月的第一天,谢谢!


 回到顶部
帅哥哟,离线,有人找我吗?
wyz20130512
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1247 积分:9428 威望:0 精华:0 注册:2013/5/12 9:22:00
  发帖心情 Post By:2017/3/12 13:00:00 [只看该作者]

Dim dtp As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")
Dim t As Date = Date.Today()
Dim y,m As Integer
y = t.Year()
m = t.Month()
Dim t2 As New Date(y,m,1)
dtp.Value = t2

 回到顶部