Foxtable(狐表)用户栏目专家坐堂 → [求助]还是关于日期空值的问题


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

主题:[求助]还是关于日期空值的问题

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


加好友 发短信
等级:童狐 帖子:250 积分:1875 威望:0 精华:1 注册:2013/5/25 18:06:00
[求助]还是关于日期空值的问题  发帖心情 Post By:2013/6/19 12:07:00 [只看该作者]

找到了is null不能用的情况。
不在filter和表达式,就在一般代码中,如何判断一个日期是否为空呢?
commitdate = iif(TempDate Is null, dr("波段交期"),TempDate)
commitdate = iif(TempDate Is Nothing, dr("波段交期"),TempDate)
以上都提示错误

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/6/19 12:09:00 [只看该作者]

dr.isNUll("波段交期")   楼主需要再看一遍帮助.

如果是判断一个值是否为空    commitdate is nothing

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


加好友 发短信
等级:童狐 帖子:250 积分:1875 威望:0 精华:1 注册:2013/5/25 18:06:00
  发帖心情 Post By:2013/6/19 13:44:00 [只看该作者]

哦。谢谢指导。等我把系统上线后,一定好好看一遍。

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


加好友 发短信
等级:童狐 帖子:250 积分:1875 威望:0 精华:1 注册:2013/5/25 18:06:00
  发帖心情 Post By:2013/6/19 14:17:00 [只看该作者]

“如果是判断一个值是否为空    commitdate is nothing”
这个问题困扰好久了。如何判断一个日期是否为空,除了在取数时用datarow的isnull来判断还有方法吗?
这个好像不行,提示如下:

图片点击可在新窗口打开查看此主题相关图片如下:日期nothing.png
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/6/19 14:17:00 [只看该作者]

贴出你的完整代码吧

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


加好友 发短信
等级:童狐 帖子:250 积分:1875 威望:0 精华:1 注册:2013/5/25 18:06:00
  发帖心情 Post By:2013/6/19 14:25:00 [只看该作者]

Dim commitdate As Date = iif(dr("使用虚拟交期"),dr("虚拟交期"),dr("承诺交期"))
        If commitdate Is Nothing '此处报错
            Dim dr0 As DataRow = DataTables("订单节点").find("[订单编号]='" & dr("订单编号") & "' and [节点名]='完成投单'")
            If dr0 IsNot Nothing
                commitdate = dr0("实际完成日期")
                commitdate = commitdate.AddDays(PT_LT)
            End If
        End If

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/6/19 14:31:00 [只看该作者]

由于Date类型比较特殊,是不可为空类型  那么要这样判断
Dim d As Date
If d =DateTime.MinValue Then
MessageBox.show("我是空值")
End If
[此贴子已经被作者于2013-6-19 14:30:50编辑过]

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


加好友 发短信
等级:童狐 帖子:250 积分:1875 威望:0 精华:1 注册:2013/5/25 18:06:00
  发帖心情 Post By:2013/6/19 14:33:00 [只看该作者]

明白了,谢谢。

 回到顶部