Dim 文件路径="/sdcard/MobileAnjian/anjian.txt"
Dim 行数
Dim 内容=array("我爱你中国","我爱你母亲")
Call file.WriteLines (文件路径,内容) //将内容中的两行字符串写入文本文件
TracePrint file.Readline(文件路径, 1) //读取并输出第一行字符串内容"我爱你中国"
TracePrint file.Readline(文件路径, 2) //读取并输出第一行字符串内容"我爱你母亲"
行数 = file.linesnumber(文件路径) //读取该文本文件的行数
TracePrint 行数 //返回行数2 |