以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  关于日期转化  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=114670)

--  作者：做自己 --  发布时间：2018/2/12 19:39:00 --  关于日期转化 17010101 这个可以转换为日期吗？应该是17年10月1日 01个记录

--  作者：wyz20130512 --  发布时间：2018/2/12 19:58:00 --   Dim s As String = "17010101" s = s.SubString(0,6) s = s.Replace("0"," 0") Dim d As Date = CDate(s) Output.Show(d)

--  作者：有点蓝 --  发布时间：2018/2/12 20:25:00 --   Dim s As String = "17010101" s = "20" & s.SubString(0,6) s = s.Insert(6,"-").Insert(4,"-") Dim d As Date = CDate(s) Output.Show(d)

--  作者：做自己 --  发布时间：2018/2/13 20:44:00 --   导入信息提示这个咋回事，导入Excel [此贴子已经被作者于2018/2/13 20:44:54编辑过]

--  作者：做自己 --  发布时间：2018/2/13 20:45:00 --   提示这个问题 此主题相关图片如下：1.png

--  作者：有点蓝 --  发布时间：2018/2/13 20:49:00 --   按钮完整代码贴出来

--  作者：做自己 --  发布时间：2018/2/13 20:51:00 --   关于如何将02 09 03按照空格分开

--  作者：有点蓝 --  发布时间：2018/2/13 20:54:00 --   想解决问题请贴出5楼出错事件里面的代码！！

--  作者：做自己 --  发布时间：2018/2/13 21:05:00 --   那个问题解决了老师，是因为D盘没有文件，我现在想解决这个问题，就是把02 09 03 转换成三个字符串，分别是02 03 09 ，09 02 03,09 03 02,03 02 09,03 09 02.就是将这个字符串三个可以颠倒

--  作者：有点蓝 --  发布时间：2018/2/13 21:44:00 --   Dim ss() As String = "02 09 03".Split(" ") array.sort(ss) Output.Show(ss(0)) Output.Show(ss(1)) Output.Show(ss(2))