function QMPlugin.ReadLine(FileName, LineNum) local LineContent = "" pcall( function() local curLineNum = 0 io.input(FileName) while true do local ReadContent = io.read() --注意 lua 中的 nil 需要写为 null if ReadContent == null then break end curLineNum = curLineNum + 1 if curLineNum == LineNum then LineContent = ReadContent end end io.close() end) LineContent = string.gsub(LineContent, "[\r\n]", "") return LineContent end
Dim 路径="/sdcard/Mobile/a.txt" TracePrint File.Readline(路径, 1) //读取并输出第一行字符串内容 TracePrint File.Readline(路径, 2) //读取并输出第二行字符串内容