(Visual FoxPro6.0程序设计教程3版)第6章循环结构程序设计.ppt

　　任务导入 　　学习目标 　　任务实施 　　1. 当型循环语句DO WHILE的语法格式　　2. 当型循环结构的特点　　3. ?DO WHILE语句使用示例　　【例6-1】 利用循环语句，求1 + 2 + 3 + … + 100的值。 　　(1) 建立应用程序用户接口与设置对象属性，参见图6-1所示。　　(2) 编写程序代码。　　运行程序，结果如图6-1所示。 　　【例6-2】 输入一个正整数，判断该数是否为素数。　　(1) 建立用户接口及设置对象属性，参见图6-2所示。　　(2) 编写事件代码。　　运行程序，结果如图6-2所示。 　　4. 步长型循环语句FOR的语法结构　　5. ?FOR循环的执行过程　　6. ?FOR语句使用示例　　【例6-3】 利用步长型循环，求1 + 2 + 3 + … + 100的值。运行结果，与图6-1相同。　　【例6-4】 求1! + 2! + 3! + … + 6!?的值。　　(1) 建立用户接口与设置对象属性，参见图6-3所示。 　　(2) 编写命令按钮Command1的Click事件代码为：　　s = 0　　t = 1　　FOR n = 1 TO 6 循环条件　　 t = t * n 累乘　　 s = s + t 累加　　ENDFOR　　THISFORM.Text1.Value = s 返回结果　　THISFORM.Text1.ReadOnly= .T.　　运行程序，结果如图6-3所示。 　　任务导入　　学习目标　　任务实施　　1. 列表框的常用属性和方法　　列表框(ListBox)显示一个项目列表，用户可以从中选择一项或多项，但不能直接编辑列表框中的数据。　　1) 列表框的常用属性　　列表框的常用属性，见表6-1。 　　2) 列表框的常用方法　　列表框的常用方法，见表6-2。 　　2. 列表框使用示例　　【例6-5】 输出如图6-4所示的“九九”乘法表。　　(1) 建立应用程序用户接口和设置对象属性。　　设计窗体接口，其中List1的属性设置，见表6-3。　　其他控件的属性设置参见图6-5所示。 　　(2) 编写命令按钮Command1的Click事件代码．　　运行程序，结果如图6-4所示。　　【例6-6】 为小学生编写加减法算术练习程序。计算机连续地随机给出两位数的加减法算术题，要求学生回答，答对的打“√”，答错的打“×”。将做过的题目存放在列表框中备查，并随时给出答题的正确率，如图6-6所示。 　　进入窗体设计器，首先增加两个文本框Text1(随机出题)、Text2(用户输入答案)、一个列表框List1(保存做过的题目)、一个命令按钮Command1、一个图像Image1和一个卷标Label1，属性的设置参见图6-7所示。 　　(2) 编写代码。　　运行程序，结果如图6-6所示。　　3. 利用列表框显示文件目录　　利用列表框可以设计显示文件目录的程序，并且可以在目录列表中方便地选定档。　　【例6-7】 设计显示文件目录的列表框程序。如图6-8所示，在列表框中选定文件后，单击“打开选定文件”按钮可打开该文件进行查看或编辑。 　　(1) 进入窗体设计器。增加一个列表框控件List1、一个命令按钮Command1、两个形状Shape1～Shape2、两个标签Label1～Label2和一个文本框Text1，如图6-9所示。　　(2) 设置List1和Text1的属性，见表6-4。 其中，列表框List1的RowSourceType属性设置为“7—挡”时： List1.List(1) 代表驱动器 List1.List(2) 代表路径 List1.List(3) 是一个分隔行 List1.List(4) 是 [..]。单击它，则返回到父目录。其他控件的属性设置，如图6-10所示。 　　(3) 编写事件代码。　　运行窗体，在列表框中选定档，按“打开选定文件”按钮，即可打开一个包含指定文本文件的编辑器，如图6-11所示。 　　4. 组合框的两种形式　　VFP中有两种形式的组合框，即下拉列表框和下拉组合框，通过更改控件的Style属性可选择所需要的形式。　　(1) 下拉列表框：Style属性值为2的组合框控件。　　(2) 下拉组合框：Style属性值为0的组合框控件。　　常用的组合框属性，见表6-5。 　　5. 下拉列表框　　如果需要节省窗体上的空间，并且希望强调当前选定的项，可以使用下拉列表框。　　【例6-8】 如图6-12所示，将例6-6“算术练习”中的列表框改为组合框(下拉列表框)。　　(1