分割字符,只能是单个字符
Dim Mac As String
Dim MacBy() As String
Mac = filesys.ReadAllText(ProjectPath & "\server\config.txt")
mac = mac.replace("BY-ZYXL-DATE", chr(11))
output.show(mac) '---- 字符串
MacBy = mac.Split(chr(11)) '-- 分割字符
output.show(macby.Length) '--- 长度
For Each by As String In macby '-- 取值
output.show(by)
Next