Visual FoxPro 程序设计上机指导与习题
1． 重点
1. if 语句和iif（）函数之间的相互转化 2. if语句的嵌套与case多分之语句的相互转化 3. while循环和for循环之间的相互转化 2． 难点
利用vfp解决各种实际问题的方法，尤其是在解决问题过程中所涉及到的算法。例如：判断构成（直角）三角形的条件的抽象；用试探法解决百钱百鸡问题等。
【讲解内容】
（1） （2） （3）
分支语句 循环语句 算法的抽象方法
31
Visual FoxPro 程序设计上机指导与习题
实验十三 子程序、自定义函数、过程、变量作用域
【实验目的】
1. 掌握子程序、函数、过程的定义方法与使用 2. 掌握各种变量的作用域与使用方法 【实验内容】
1.新建程序excercise13.prg。编写代码，定义三个变量A、B、C，分别赋值1，2，3。输出A、B、C。调用程序excercise14.prg。重新输出A、B、C。保存程序。新建程序excercise14.prg编写代码，对A、B、C重新赋值4，5，6，并用”?”输出。观察后程序对前程序的变量影响。
2.修改程序excercise13.prg中的代码，将A声明为全局型内存变量，B声明为局部性内存变量。修改程序excercise14.prg中的代码，将C声明为隐蔽性内存变量。其他代码保持不变。观察输出结果有何不同，总结结论。
3.建立一个程序文件excercise15.prg，完成以下功能：
输入两个数（最好是有正负号）到内存变量A、B中。利用do?with?语句调用子程序excercise16.prg。求出A、B两个数的绝对值，利用变量C先后保存并输出。编写相应的excercise16.prg，完成接收参数功能，和求出接受参数的绝对值并返回的功能。
4.将上题分别利用过程和自定义函数完成功能。 【重点难点】
1. 重点
(1)多模块层次的理解 (2)子程序和自定义函数的调用 2. 难点
(1)子程序和自定义函数的建立 (2)变量的作用域
【讲解内容】
1. 子程序和自定义函数的异同
2. 子程序和自定义函数的建立和调用的实例 3. 变量的作用域的实例
32
Visual FoxPro 程序设计上机指导与习题
实验十四 面向对象程序设计，表单概念及基本操作
【实验目的】
1.掌握表单的概念，表单的属性设置与基本操作。 2.掌握messagebox()的适用于各种参数的使用。 【实验内容】
1.在命令窗口中输入命令，试验messagebox()的各种形式的弹出窗口。 2.新建表单文件form1.scx，保存。将表单form1属性设置如下： 表单背景色：RGB(120,11,231)，运行，察看结果。 表单属性：autocenter设置为.T.，运行，察看结果。
分别设置属性：caption“现代教育技术教学部”，maxbutton:enabled=.F.，width=200，height=200，运行，察看结果。
3.新建表单文件form2.scx，保存。双击表单，弹出代码录入窗口，在对象：form1；过程：click代码录入窗口中录入：messagebox(“你好！欢迎来到表单世界！！！”)。运行，察看结果。
4.新建表单文件form3.scx，保存。双击表单，弹出代码录入窗口，在对象：form1；过程：click代码录入窗口中录入代码，要求运行是双击表单时，弹出对话框，框中有两个按钮“是”“否”，要求对话框单击“是”时，表单背景色变为红色，否则变为蓝色。运行，察看结果。 【重点难点】
1. 重点
(1)用命令和菜单建立表单的方法
(2)表单设计器、属性窗口、控件工具栏以及代码编写窗口的使用方法 (3)事件的选择 2. 难点
（1） messagebox（）函数中各参数的意义
（2） 选择相应的事件编写代码来完成既定工作的方法 【讲解内容】
1．messagebox（）函数 2．Rgb（）函数 3．Click（）事件
33
Visual FoxPro 程序设计上机指导与习题
实验十五 表单的常用控件的应用
【实验目的】
1.掌握标签、文本框、命令按钮、编辑框、单选按钮、复选框等常用控件的添加及控件的属性设置、事件与方法程序的设置方法及数据环境的设置。
2.了解图形、线条、形状、微调按钮、命令按钮组、计时器、ActiveX控件的重要属性。 【实验内容】
1.新建一个表单form16-1，在控件工具栏中找到上面所述各控件，逐个添加后注意观察各个控件的形态。
2.新建一个表单form16-2，分别添加图形、线条、形状控件，分别做如下属性调整： (1)选中已添加图形控件，调整其picture属性使该控件中显示一个图片（可以选c:\\program files\\Microsoft visual studio\\common.\\graphics中任意图片）。
(2)选中已添加的线条控件，分别调整其Width、Height属性，使其成为水平线和垂直线。 (3)选中已添加形状控件，调整其Curvature属性，分别将其值设置为：0， 50，98，99，观察其形状的变化；在Curvature属性值为99时，调整其Width、Height属性分别使其成为圆和椭圆。
3.新建一个表单form16-4,界面如下所示：
（1）在数据环境中打开表rsda .dbf，修改相应的属性值并编写适当的代码使得各个控件的功能得以实现。
（2）下图为其中的一个效果图：
34
Visual FoxPro 程序设计上机指导与习题
4.新建一个表单form16-3，添加ActiveX控件，使其中显示艺术字：“自制电子表”，然后再添加一个标签，其Caption属性为：“自制电子表”，最后添加一个计时器控件，做如下调整：
(1)选中已添加计时器控件，调整其Interval属性为：1000。 (2)编写代码实现：在标签中模拟电子表的显示状况。 【重点难点】
1．重点
（1） 文本框、编辑框的使用方法及异同 （2） 命令按钮组和命令按钮的使用方法及异同 （3） 计时器的重要属性和事件 2．难点
（1） 计时器和ActiveX控件的使用 （2） 数据环境的使用方法
【讲解内容】
1． 各种控件的特性、重要属性 2． 电子时钟和艺术字的处理方法 3． 数据环境的使用
35