新Visual FoxPro 6.0程序设计教程（丁爱萍） 第6章.pptVIP

* 第6章 循环结构设计 在线教务辅导网： 教材其余课件及动画素材请查阅在线教务辅导网 QQ:349134187 或者直接输入下面地址： 第6章 循环结构设计 6.1 循环结构语句 6.2 列表框与组合框控件 6.3 页框 6.1 循环结构语句 在Visual FoxPro中，提供了三种循环语句：DO WHILE ... ENDDO（当型循环）、FOR ... ENDFOR（步长型循环）、SCAN ... ENDSCAN（表扫描型循环）。 无论何种类型的循环结构，其特点都是：循环体执行与否及其执行次数多少都必须视其循环类型与条件而定，且必须确保循环体的重复执行能在适当的时候得以终止（即非死循环）。 6.1.1 当型循环语句DO WHILE 1. 当型循环的语法格式 如果需要在某一条件满足时反复执行某一操作，可以使用当型循环（DO WHILE）结构。 当型循环的语法格式为： DO WHILE〈条件〉 [〈命令列〉] [EXIT] [LOOP] ENDDO 说明： (1) 如果〈条件〉的值为.T.，则执行DO WHILE和ENDDO之间的循环体；如果〈条件〉的值为.F.，则结束循环，转去执行ENDDO之后的命令。 每执行一遍循环体，程序自动返回到DO WHILE语句，判断一次〈条件〉。 (2) EXIT是无条件结束循环命令。 (3) LOOP是无条件循环命令。 2. 当型循环结构的特点 “当型”循环结构的根本特点是：当所给定循环条件为真时，就反复执行其循环体；当该条件为假时，终止执行其循环体，执行其后继命令。循环体执行次数最少可为零。 6.1.2 步长型循环命令FOR 1. 步长型循环语句 步长型循环可以根据给定的次数重复执行循环体。其语法结构为： FOR 〈内存变量〉=〈初值〉TO〈终值〉[STEP〈步长值〉] [〈命令列〉] [EXIT] [LOOP] ENDFOR | NEXT 说明： (1) EXIT跳出FOR...ENDFOR循环。 (2) LOOP将控制直接转回到FOR子句。 (3) 在使用循环嵌套时要注意：内外循环的循环变量不能同名，并且内外循环不能交叉。如 正确 错误 2. 步长型循环的执行过程 循环的执行过程是：开始时首先把〈初值〉、〈终值〉和〈步长值〉读入，然后〈内存变量〉的值与〈终值〉比较，如果〈内存变量〉的值在〈初值〉与〈终值〉范围内，则执行FOR与ENDFOR之间的命令，然后〈内存变量〉按〈步长值〉增加或减小，重新比较，直到〈内存变量〉的值不在〈初值〉与〈终值〉范围内，结束循环，转去执行ENDFOR后面的第一条命令。 6.2 列表框与组合框控件 列表框和组合框为用户提供了包含一些选项和信息的可滚动列表。在列表框中，任何时候都能看到多个项，而在组合框中，平时只能看到一个项，用鼠标单击向下按钮可以看到多项的列表。 6.2.1 列表框 列表框（ListBox）显示一个项目列表，用户可以从中选择一项或多项，但不能直接编辑列表框中的数据。当列表框不能同时显示所有项目时，它将自动添加滚动条，使用户可以上下或左右滚动列表框，以查阅所有选项。 1. 列表框的常用属性 表6-1 常用列表框属性 属性 说 明 List 设置或返回列表中选项，使用List属性可以得到列表中的任何选项。例如，List1.List(1)表示列表框List1中第2项的值 Value 列表中当前选项的值 ListCount 列表框中的选项个数 ListIndex 当前选项的索引号，如果没有选项被选中，该属性为0 Selected 在程序运行时，使用代码来选定列表中的选项，例如，THISFORM.List1.Selected(3) = .T.表示选中列表框List1中的第3条选项 ColumnCount 列表框的列数 2. 列表框的常用方法 表6-2 常用列表框方法 方法程序 说 明 AddItem 给RowSourceType属性为0的列表添加一项 Clear 清除列表中的各项 RemoveItem 从RowSourceTyp