Foxtable(狐表)用户栏目专家坐堂 → [求助]文本转日期


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

主题:[求助]文本转日期

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


加好友 发短信
等级:婴狐 帖子:4 积分:114 威望:0 精华:0 注册:2014/6/5 16:39:00
[求助]文本转日期  发帖心情 Post By:2014/6/9 11:50:00 [只看该作者]

在foxtable表中怎样将文本转为日期?如:将20140609转换为2014-06-09

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


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

Dim s As String = "20140609"
Dim d As Date = s.SubString(0,4) & "-" & s.SubString(4,2) & "-" & s.SubString(6,2)
MessageBox.show(d)

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


加好友 发短信
等级:婴狐 帖子:4 积分:114 威望:0 精华:0 注册:2014/6/5 16:39:00
  发帖心情 Post By:2014/6/9 12:02:00 [只看该作者]

表中有几万条文本格式,该怎么转换成日期?


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


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

for each dr as datarow in datatables("表名").datarows
      dr("日期")=dr("日期").SubString(0,4) & "-" & dr("日期").SubString(4,2) & "-" & dr("日期").SubString(6,2)
next

 回到顶部