//ä¸é¢è¿å¥æ¯åç®æ æ件("C:\Config.txt")读åºææ¬å
容å°åé(Text)
Text = Plugin.File.ReadFileEx("C:\Config.txt")//æ件路å¾å¯ä»¥èªå·±æ¹
TracePrint "åç®æ æ件读åºææ¬å
容为ï¼"& Text
dim MyArray
MyArray = Split(Text, "|")
If UBound(MyArray)>=0 Then
i=0
For UBound(MyArray)
//ä¸é¢è¿å¥æ¯å¾å°ææ¬å
容
SayString Cstr(MyArray(i))//éè¡è¾åºå
容
i=i+1
Next
End If
温馨提示:答案为网友推荐,仅供参考