Foxtable(狐表)用户栏目专家坐堂 → [求助]DateTimePicker选定日期后如何带上时间 08:00:00


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

主题:[求助]DateTimePicker选定日期后如何带上时间 08:00:00

帅哥哟,离线,有人找我吗?
有点色
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/5/31 17:13:00 [显示全部帖子]

textchanged事件

 

Dim str As String = e.Sender.Text
Dim d As Date
If str > "" AndAlso Date.TryParse(str, d) AndAlso d.Hour = 0 AndAlso d.Minute = 0 AndAlso d.Second = 0 Then
    e.Sender.text = new Date(d.Year, d.Month, d.Day, 8, 0, 0)
End If


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/5/31 17:51:00 [显示全部帖子]

 你赋值的如果是一个正确的日期值,那就没问题。


 回到顶部