以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  日期列问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=50031)

--  作者:nxqtxwz
--  发布时间:2014/4/28 11:33:00
--  日期列问题
各位老师,我将EXCEL表导入FOXTABLE后,有一列出生日期列是字符型,格式是19900302这样的形式,想改成日期型列但出错,显示:标准表达式中数据类型不匹配。请问怎么解决。
--  作者:Bin
--  发布时间:2014/4/28 11:35:00
--  
1990-03-02  改为这样才可以.
--  作者:nxqtxwz
--  发布时间:2014/4/28 11:37:00
--  
请问老师,如何实现1990-03-02 这样的格式
--  作者:Bin
--  发布时间: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

--  作者:有点甜
--  发布时间: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