Foxtable(狐表)用户栏目专家坐堂 → [讨论]判断字符串是日期格式的方法


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

主题:[讨论]判断字符串是日期格式的方法

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


加好友 发短信
等级:一尾狐 帖子:436 积分:5082 威望:0 精华:0 注册:2012/3/27 15:33:00
[讨论]判断字符串是日期格式的方法  发帖心情 Post By:2013/10/31 14:07:00 [只看该作者]

我知道isdate可以判断某列是不是日期格式
但如何判断一个字符串是不是日期格式,例如
Dim 收货日期1  As String  ="2013-10-"
Dim 收货日期2  As String  ="2013-10-31"
计算出"收货日期1"不是日期
        "收货日期2"是日期格式
求代码写法。

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


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


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


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

Dim s As String ="2013/10/301"
Dim d As Date
If Date.TryParse(s,d) Then
  MessageBox.show("正常的日期值")
Else
  MessageBox.show("不正常的日期值")
End If

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/10/31 14:24:00 [只看该作者]

If IsDate("2016/11/30") Then
    Output.Show("是的")
Else
    Output.Show("不是")
End If

 回到顶部