```language //苏婷脚本学院编写 Function 随机话术(名称) Dim 路径="/sdcard/"&名称&".txt" Dim 内容= File.ReadLines(路径) Dim 数量=File.LinesNumber(路径) 随机话术 = 内容(Int(数量 * Rnd())) End Function ```