\'\'\' Dim s As String = "是否公开审理:公开 旁听人数:2人" msgbox(s.split("旁听人数:")(1))
此主题相关图片如下:image 1.jpg
-- 作者:有点甜
-- 发布时间:2018/10/24 16:14:00
--
Dim s As String = "是否公开审理:公开 旁听人数:2人" Dim mc = System.Text.RegularExpressions.Regex.Matches(s, "(?<=旁听人数:)\\d+") msgbox(mc(0).value)