Foxtable(狐表)用户栏目专家坐堂 → 日期列问题


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

主题:日期列问题

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


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
日期列问题  发帖心情 Post By:2014/4/28 11:33:00 [只看该作者]

各位老师,我将EXCEL表导入FOXTABLE后,有一列出生日期列是字符型,格式是19900302这样的形式,想改成日期型列但出错,显示:标准表达式中数据类型不匹配。请问怎么解决。

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


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

1990-03-02  改为这样才可以.

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


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2014/4/28 11:37:00 [只看该作者]

请问老师,如何实现1990-03-02 这样的格式

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


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

For Each dr As DataRow In DataTables("表A").DataRows
    dr("日期")=dr("日期").Substring(0,4) & "-" & dr("日期").Substring(4,2) & "-" & dr("日期").Substring(6,2)
Next

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/4/28 11:53:00 [只看该作者]

 先导入数据,然后执行下面的代码,然后把这一列改成日期类型

 

For Each dr As DataRow In DataTables("表A").DataRows
    If dr("日期").Length >= 8 Then
        dr("日期")=dr("日期").Substring(0,4) & "-" & dr("日期").Substring(4,2) & "-" & dr("日期").Substring(6,2)
    End If
Next

 回到顶部