文件名称：控制结构--循环续-tcl脚本入门
文件大小：168KB
文件格式：PPT
更新时间：2024-05-14 17:57:05
tcl 脚本 入门
控制结构--循环（续） while 循环 while { test_condition } { body; } set x 0 while {$x<10} { puts "x is $x" incr x } 在实际程序中，while 用到较多的地方是处理文件， set fpIn [open $FileName r ] while { [eof $fpIn ] != 1 } { set CurLine [gets $fpIn ] if { $CurLine == “” } { continue } . . . }