以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  代码求助 获取随机文本中的全部时间  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=191644)
--  作者：夜点蚊香
--  发布时间：2024/4/28 11:50:00
--  代码求助 获取随机文本中的全部时间
文本
[{出方向打卡时间= 08:41, 进方向打卡时间= 08:06}, {进方向打卡时间= 09:09}, {进方向打卡时间= 10:01}, {出方向打卡时间= 11:06, 进方向打卡时间= 10:39}, {出方向打卡时间= 15:46, 进方向打卡时间= 13:51}]

获取里面的全部时间，请指教。多谢多谢
--  作者：y2287958
--  发布时间：2024/4/28 12:13:00
--  
别的字符都一致，替换一下即可
--  作者：有点蓝
--  发布时间：2024/4/28 12:22:00
--  
Dim s As String = "[{出方向打卡时间= 08:41, 进方向打卡时间= 08:06}, {进方向打卡时间= 09:09}, {进方向打卡时间= 10:01}]"
s = s.Replace("{", """").Replace("}", """")

Dim ja As JArray = JArray.Parse(s)
For i As Integer = 0 To ja.Count - 1
    output.show(ja(i))
Next
--  作者：夜点蚊香
--  发布时间：2024/4/29 9:07:00
--  
搞定了，多谢