第一种方法:

set fp [open grade.txt r]
while {[gets $fp line]!=-1} {
puts $line
}

第二种方法:

set fp [open grade.txt r]
while {![eof $fp]} {
gets $fp line
puts $line
}
Logo

讨论HarmonyOS开发技术,专注于API与组件、DevEco Studio、测试、元服务和应用上架分发等。

更多推荐