- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]能否将字符串转换为表格？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=146910)
-- 发布时间：2020/3/5 18:42:00
-- [求助]能否将字符串转换为表格？
请教老师，能否将字符串转换为表格？如下图：
此主题相关图片如下：2020-03-05_18-37-21.png
-- 发布时间：2020/3/5 19:24:00
--
Dim reg As New System.Text.RegularExpressions.Regex("(\\d{4}-\\d\\d-\\d\\d)(.+?。)")
For Each mat As System.Text.RegularExpressions.Match In reg.Matches("2012-12-31 吃饭。 2012-11-02 洗碗。 2012-12-01 做饭")
MessageBox.Show(mat.Groups(1).Value & ":" & mat.Groups(2).Value)
Next