分割字符串问题？

dreamgengs

//**********从本机文本文件读取信息**********
t=1:s=0
Set fso=CreateObject("Scripting.FileSystemObject")
Set f=fso.OpenTextFile("C:\Program Files\zdhjy\one.txt", 1)
坐标字符串=f.ReadAll
f.Close
For len(坐标字符串)        
    单个坐标=Mid(坐标字符串,t,1)
    If asc(单个坐标)=13 Then
        t=t+1:s=s+1   
    Else
        t=t+1:sjzb(s)=sjzb(s)&单个坐标  
    End If  
Next

按健改TC。
现在用TC来写遇到个问题，从TXT文件中读取的字符串要将其分割若干个，分割的条件是最到回车，TOB，空格既分割。现在是怎么识别回车 TOB 和空格。

我没找到相关命令，跪求指点。

qq06314488

分割的那个分隔符可以改成" "

ericyt30

转意字符串"/r/n"拿这个分割去