Foxtable(狐表)用户栏目专家坐堂 → 日期输入框相加


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

主题:日期输入框相加

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


加好友 发短信
等级:狐神 帖子:4724 积分:34374 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2019/3/6 14:23:00 [显示全部帖子]

Dim rq As Date = e.Form.controls("DateTimePicker1").value
Dim zq As Integer = e.Form.controls("检测周期").value
Dim xc As Date = e.Form.controls("DateTimePicker2").value
If rq = Nothing AndAlso zq = Nothing Then
    xc = Nothing
Else
    xc = rq.adddays(zq)
End If

 回到顶部