字符转换日期 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 字符转换日期

共有2535人关注过本帖树形打印复制链接主题：字符转换日期

lfz123

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：530 积分：4613 威望：0 精华：0 注册：2018/3/24 18:04:00

字符转换日期 发帖心情

Post By：2019/6/12 22:28:00 [只看该作者]

如何将EXCEL表中的字符比如20190531复制到fox的日期列时自动进行转换呢

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2019/6/13 9:43:00 [只看该作者]

1、你是手动直接复制粘贴的？还是通过代码导入数据的？

2、如果是处理粘贴板的内容，参考

Dim str As String = "20190506 20190405 20190607" '模拟粘贴板数据
str = System.Text.RegularExpressions.Regex.Replace(str, "(?<year>\d{2,4})(?<month>\d{1,2})(?<day>\d{1,2})", "${year}-${month}-${day}")
msgbox(str)

lfz123

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：530 积分：4613 威望：0 精华：0 注册：2018/3/24 18:04:00

回复：（有点甜）1、你是手动直接复制粘贴的？还是通过... 发帖心情

Post By：2019/6/13 10:13:00 [只看该作者]

是第一种,手动复制粘贴喔

有点甜

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2019/6/13 12:51:00 [只看该作者]

那你就做个按钮，处理粘贴板字符，如

Dim str As String = ClipBoard.GetText
str = System.Text.RegularExpressions.Regex.Replace(str, "(?<year>\d{2,4})(?<month>\d{1,2})(?<day>\d{1,2})", "${year}-${month}-${day}")
msgbox(str)
ClipBoard.SetText(str)

下一主题 >> << 上一主题

主题：字符转换日期