你的意思是读txt文件内容吧。 //下面这句是向目标文件("C:\Config.txt")读出文本内容到变量(Text) Text = Plugin.File.ReadFileEx("C:\Config.txt") Msgbox "向目标文件读出文本内容为:"& Text MyArray = Split(Text, "|") If UBound(MyArray)>=0 Then For i=0 To UBound(MyArray) //下面这句是得到文本内容 Msgbox "第 " & i+1 &" 行文本内容为:"& Cstr(MyArray(i)) Next End If