《Visual FoxPro6.0程序设计教程》课件第5章

任务5.1条件选择语句

任务5.2选择性控件、计时器、微调器

任务导入

学习目标

任务实施

1.单条件选择语句IF的语法格式

单条件选择语句IF实现的是最常用的双分支选择，其特点是：根据所给定的选择条件(条件表达式)的值为真与否，来执行相应的分支。任务5.1条件选择语句建立用户界面与设置对象属性，如图5-1所示。

运行程序，结果如图5-2所示。图5-1建立用户界面与设置对象属性图5-2运行结果

(1)建立应用程序用户界面。

选择“新建”表单，进入表单设计器，增加3个文本框Text1～Text3、一个命令按钮Command1和4个标签Label1～Label4，如图5-3所示。

(2)设置对象属性。

属性设置参见表5-1。图5-3建立程序界面和设置属性表5-1属性设置运行程序，在文本框中分别输入3个数，单击“排序”按钮后，排序后的数显示在下排3个标签中，如图5-4所示。图5-4从大到小排序程序运行结果

2.使用IIF函数

对于单条件选择结构，除了使用IF语句外，还可以使用IIf函数实现较简单的选择结构。IIf函数的语法结构为：

IIf(〈条件〉,〈真部分〉,〈假部分〉)设计步骤如下：

(1)建立应用程序用户界面，如图5-5左所示。

(2)设置对象属性。

设置对象属性，见表5-2。图5-5建立用户界面和设置对象属性表5-2对象属性设置其他属性的设置参见图5-5右所示。

运行程序如图5-6所示。图5-6判断奇偶性

3. IF语句的嵌套

如果在IF语句中的〈语句列1〉或〈语句列2〉本身又是一个IF语句，则称之为IF语句的嵌套。

(1)建立应用程序用户界面与设置对象属性。

建立应用程序用户界面与设置对象属性，如图5-7所示。

(2)编写程序代码。图5-7优惠付款程序运行结果运行结果如图5-7所示。

设计步骤如下：

(1)建立应用程序用户界面与设置对象属性，如图5-8所示。

(2)编写代码。

运行程序，在文本框中输入方程的系数，按“判断”按钮即可判断方程有无实根等情况，并且求出根来，如图5-9所示。图5-8建立应用程序用户界面和设置对象属性图5-9求一元二次方程的根

4.多条件选择语句DOCASE

虽然使用IF语句嵌套的办法可以实现多分支选择，但这样用IF语句编写的程序较长，程序可读性明显降低。

设计步骤如下：

(1)建立应用程序用户界面与设置对象属性，如图5-10所示。图5-10抽奖机用户界面

(2)编写代码。

程序运行结果如图5-11所示。图5-11抽奖机游戏任务导入

学习目标

任务实施

1.命令按钮组

如果表单上需要使用多个命令按钮，可以将这些命令按钮组合为一组，即命令按钮组(Commandgroup)。命令按钮组是一个容器对象，其中包含命令按钮，它的层次性如图5-12所示。

任务5.2选择性控件、计时器、微调器图5-12命令按钮组的层次性

【例5-8】利用命令按钮组，设计模拟抽奖机游戏，如图5-13所示。

将命令按钮组Commandgroup1的ButtonCount属性改为5，如图5-14所示。

各控件属性的设置参见图5-15所示。图5-13利用命令按钮组设计模拟抽奖机游戏图5-14建立应用程序界面

图5-15设置属性后的界面

(3)编写程序代码。

(4)运行程序，结果如图5-13所示。

2.按钮组生成器

利用按钮组生成器可以更方便地设计命令按钮组。

(1)用鼠标右键单击命令按钮组控件CommandGroup1，在快捷菜单中选择“生成器”，如图5-16所示，打开“命令组生成器”对话框。

(2)在“命令组生成器”对话框的“按钮”选项卡中，修改“按钮的数目”为5，这相当于在属性窗口修改ButtonCount属性为5。图5-16“命令组生成器”对话框

(3)在“布局”选项卡中，可以指定命令按钮组的排列方式，如水平或垂直、有无边框等。将“按钮间隔”微调器的值调整为0，除去各命令按钮间的间隔。

(4)单击“确定”按钮退出命令组生成器。

3.选项按钮组

选项按钮组是一组相互排斥的选项按钮(或称为单选按钮)。

【例5-9】

利用选项按钮组控制文本的字型和字号。

分析：在表单中建立两组选项按钮，分别放在“字型”和“字号”的选项按钮组中，如图5-17所示。图5-17用选项按钮组控制文本的字型和字号在“选项组生成器”的“按钮”选项卡中，修改“按钮的数目”为3，分别修改3个按钮的标题(Caption属性)为：宋体、黑体、隶书，如图5-18所示。

(3)编写程序代码。

运行程序，结果如图5-17所示。图5-18利用“选项组生成器”设计选项按钮组

4.选项组的图形方式

可以将选项组设计成图形按钮的形式。

如图5-19所示，可以在“选项组生成器”对话框的“按钮”选项卡中，选中“图形方式”，单击“…”按钮，在弹出的“打开图片”对话框中选择某个图片。图5-19通过“选项组生成器”设计图形按钮

(1)用鼠标右键单击选项组OptionGroup1，在快捷菜单中选择“编辑”，OptionGroup1的四周出现浅色边界，开始对选项组(容器)中的按钮进行编辑。

(2)依次选中3个按钮Option1～Option3，将其标题(Caption)属性改为：(空)，自动大小(AutoSize)属性改为：.F.—

假，图片(Picture)属性通过浏览按钮“…”进行查找，并分别改为不同的图片，如图5-20所示。

(3)最后适当调整按钮的大小与相互位置。图5-20通过属性窗口设置选项按钮为图形方式

5.复选框

选项按钮组的作用是“多中选一”，当需要同时选择多项时，可以采用多个复选框控件。

【例5-10】

利用复选框来控制文本的字体风格，如图5-21所示。图5-21利用复选框控制文本的字体风格

(1)选择新建表单，进入表单设计器，增加一个文本框控件Text1、3个复选框控件Check1、Check2和Check3。

(2)设置对象属性，见表5-3。表5-3属性设置

(3)编写事件代码。

运行程序，如图5-21所示，可以分别选择粗体、斜体和下划线修饰，也可以同时选择其中的两项或三项。

6.键盘事件

在VFP中经常使用键盘事件(KeyPress)来响应各种按键操作。

(1) nKeyCode是一个数值，一般表示被按下字符键的ASCII码。特殊键和组合键的编码，参见表5-4。表5-4特殊键和组合键的编码

(2) nShiftAltCtrl参数表示按下的组合键(〈Shift〉、〈Ctrl〉、〈Alt〉)。表5-5列出了单独的组合键在nShiftAltCtrl中返回的值。表5-5组合键的编码

【例5-11】

输入圆的半径r，利用选项按钮计算圆面积、周长，如图5-22所示。图5-22利用选项按钮选择运算

(1)建立应用程序用户界面。

进入表单设计器，增加一个选项按钮组控件OptionGroup1、一个文本框Text1、二个标签控件Label1～Label2，如图5-22所示。

(2)设置对象属性。

各控件属性的设置可以参照图5-22和表5-6。表5-6属性设置

(3)编写代码。

编写表单的Activate事件代码：

THIS.Text1.SetFocus

编写选项按钮组OptionGroup1的Click事件代码：

THISFORM.Text1.KeyPress(13)

在表单中，还可以同时使用不同的选项按钮组来控制不同的选择。

7.计时器

Timer(计时器)控件能有规律地以一定的时间间隔激发计时器事件(Timer)而执行相应的事件代码。

计时器控件的主要属性见表5-7。表5-7Timer控件的主要属性

【例5-12】

设计一个数字时钟。

设计步骤如下：

(1)建立用户界面。

在表单上建立一个计时器控件和两个标签控件，如图5-23所示。

(2)设置对象属性，见表5-8。其他属性参见图5-23所示。表5-8属性设置

(3)编写事件代码。

编写计时器控件Timer1的Timer事件代码：

THISFORM.Label2.Caption=

SUBSTR(TTOC(DATETIME()),11)

程序运行结果如图5-24所示。图5-23建立数字时钟用户界面图5-24数字时钟

8.微调器

Spinner(微调器)控件可以在一定范围内控制数据的变化。

如图5-25所示，微调器的主要属性有：

(1) KeyboardHighValue和KeyboardLowValue属性：用来控制用户通过键盘输入的值。

(2) SpinnerHighValue和SpinnerLowValue属性：用来控制用户通过鼠标单击箭头获得的值。

(3) Increm