ReadFileEx 读取文件 |
|
向目标文件读出文本内容 |
|
参数1 字符串型,目标文件路径 |
|
字符串型,读出文本内容 |
|
//下面这句是向目标文件("C:\Config.txt")读出文本内容到变量(Text) Text = Plugin.File.ReadFileEx("C:\Config.txt") Msgbox "向目标文件读出文本内容为:"& Text dim MyArray MyArray = Split(Text, "|") If UBound(MyArray)>=0 Then i=0 For UBound(MyArray) //下面这句是得到文本内容 Msgbox "第 " & i+1 &" 行文本内容为:"& Cstr(MyArray(i)) i=i+1 Next End If |
|
|
//下面这句是向目标文件("C:\Config.txt")读出文本内容到变量(Text) Plugin Text = File.ReadFileEx("C:\Config.txt") Msgbox "向目标文件读出文本内容为:"& Text MyArray = Split(Text, "|") If UBound(MyArray)>=0 i=0 For UBound(MyArray) //下面这句是得到文本内容 Msgbox "第 " & i+1 &" 行文本内容为:"& Cstr(MyArray(i)) i=i+1 EndFor EndIf |