VFP表单实验参考讲义一、标签和文本框（一）题目要求：（1）该表单的名称为“Form1”，标题为“密码输入窗口”，高度为190，宽度为300；（2）定义一个名称为“Label1”、标题为“请输入密码”、字号为10磅的标签；（3）定义一个名称为“Text1”的文本框，用于输入密码，当输入密码时，屏幕显示“*”；（4）定义一个名称为“Label2”的标签，标题为空，自动调整控件大小；（5）定义一个名称为“Command1”，标题为“显示密码”的按钮，当单击该按钮时，标签“Label2”显示输入的密码，编写Click事件代码（6）定义一个名称为“Command2”，标题为“关闭”的按钮，当单击该按钮时，释放该表单。

(不得退出VFP系统)操作要点：1）注意将text1的属性passwordchar设置为：*2）label2的属性autosize设置为：.T.3）“显示密码”按钮Command1的Click事件代码:写法一：写法二：X=X3）“关闭”的按钮Command2的Click事件代码:（二）Command1 的CLICK事件代码:欢迎使用"else密码错误"EndifCommand2 的CLICK事件代码:（三）代码编写：1)“确定”按钮Command1的Click事件代码:If 欢迎光临”，65，“密码正确“)ElseMessagebox(“禁止进入“，65，”密码错误“) Endif2）“关闭”的按钮Command2的Click事件代码:（四）代码编写：1)“确定”按钮Command1的Click事件代码:r=s=*r*rmessagebox(str(s,5,2),65,”面积”)2) “关闭”的按钮Command2的Click事件代码:（五）题目要求：(1) 该表单的名称为“Form1”，标题为“温度转换”，高度为260，宽度为400；2) 定义一个名称为“Label1”标题为“摄氏温度”的标签；再定义一个名称为“Label2”标题为“华氏温度”的标签,两个标签的字号均为11磅；3) 定义一个名称为“Text1”的文本框，用于输入摄氏温度，再定义一个名称为“Text2”的文本框，具有只读属性，用于显示华氏温度; 4) 定义一个名称为“Command1”，标题为“转换”的按钮，当单击该按钮时，将输入的摄氏温度转换成华氏温度并显示在Text2文本框中，编写其Click事件代码；其中：华氏温度=9/5*摄氏温度+32 5) 定义一个名称为“Command2”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)。

操作要点：1）文本框text2的readonly属性设置为.T.2）“转换”按钮Command1的Click事件代码:X=Val(9/5*X+322）“关闭”的按钮Command2的Click事件代码:（六）题目要求：（1）该表单的名称为“Form1”，标题为“计算”，高度为260，宽度为400；（2）定义三个文本框，从左到右名称分别为“Text1”、“Text2”和“Text3”，其中“Text1”、“Text2”用于输入两个数，“Text3”用于显示“Text1”和“Text2”中两数之和；（3）定义一个名称为“Label1”的标签，标题为“+”；（4）定义一个名称为“Label2”的标签，标题为“等于”；（5）定义一个名称为“Command1”，标题为“确定”的按钮，当单击该按钮时，文本框“Text3”中显示“Text1”和“Text2”中两数之和；（6）定义一个名称为“Command2”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)操作要点：1）“确定”按钮Command1的Click事件代码:X=Val(Y=Val(X+Y2）“关闭”的按钮Command2的Click事件代码:（七）题目要求：(1)该表单的名称为“Form1”，标题为“奇偶判断”，高度为260，宽度为400；(2)定义一个名称为“Label1”标题为“请输入一个数”的标签；(3)定义一个名称为“Label2”标题为“结果”的标签；(4)定义一个名称为“Text1”的文本框；(5)定义一个名称为“Text2”的文本框，具有只读属性(6)定义一个名称为“Command1”，标题为“判断”的按钮，当单击该按钮时，若Text1文本框输入的为偶数，则在Text2文本框中显示“这是一个偶数”，否则显示“这是一个奇数”，编写其Click事件代码；(7)定义一个名称为“Command2”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统) 操作要点：1）“判定”按钮Command1的Click事件代码:X=Val MOD(X,2)=0这是一个偶数!”ELSE这是一个奇数!”ENDIF2）“关闭”的按钮Command2的Click事件代码:（八）代码编写：1）“计算”按钮Command1的Click事件代码:x=this2）“关闭”的按钮Command2的Click事件代码:（九）代码编写：1）“产生随机数”按钮Command1的Click事件代码:法一：x=int(1000*rand())if x>=100Endif法二：x=int(900*rand())+1002) “判别”按钮Command2的Click事件代码:XIf mod(x,2)=0T“偶数“ElseT“奇数“endif3）“关闭”的按钮Command3的Click事件代码:（十）题目要求：(1)该表单的名称为“Form1”，标题为“颜色设置”，高度为260，宽度为400；(2)定义一个名称为“Label1”标题为“红”的标签；(3)定义一个名称为“Label2”标题为“绿”的标签；(4)定义一个名称为“Label3”标题为“蓝”的标签；(5)定义三个名称分别为“Text1”、“Text2”、“Text3”的文本框；(6)定义一个名称为“Command1”，标题为“设置为表单背景色”的按钮，当单击该按钮时，表单背景色设置为用3个文本框中数字组成的rgb颜色，编写Click事件代码；(7)定义一个名称为“Command2”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统) 。

操作要点：1）Command1的Click事件代码:X=Val(Y=Val(Z=Val(=RGB(X,Y,Z)2）“关闭”的按钮Command2的Click事件代码:二、列表框（十一）题目要求：(1)该表单的名称为“Form1”，标题为“列表框应用”，高度为260，宽度为400；(2)定义一个名称为“LABEL1”，标题为“你的选择是”的标签；(2)定义一个名称为“TEXT1”的文本框，具有只读属性；(3)定义一个名称为“List1”的列表框，数据来源类型为值，列表项的来源设置为“神州5号，神州6号，嫦娥1号”，当选中列表项后，选中的项显示在文本框中，编写其CLICK事件代码。

(4)定义一个名称为“Command1”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)。

操作要点：1）TEXT1的只读设置: READONLY属性设为.T.2）LIST1的ROWSOURCETYPE属性选择”1--值”,ROWSOURCE属性里写上“神州5号，神州6号，嫦娥1号”注意:分隔的逗号全部是英文逗号！！！3）列表框LIST1的CLICK事件代码:或4）“关闭”按钮Command1的Click事件代码:（十二）题目要求：(1)该表单的名称为“Form1”，标题为“风景区添加”，高度为260，宽度为400；(2)定义一个名称为“Text1”的文本框，字体为10磅字；(3)定义一个名称为“List1”的列表框，数据来源类型为1，列表项的来源设置为“泰山,黄山” (4)定义一个名称为“Command1”，标题为“添加”的按钮，当单击该按钮时，文本框中输入的内容添加到列表框最后,编写其Click 事件代码；(5)定义一个名称为“Command2”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)。

代码编写：1）“添加”按钮Command1的Click事件代码:2）“关闭”的按钮Command2的Click事件代码: （十三）题目要求：（1）该表单的名称为“Form1”，标题为“我的表单”，高度为260，宽度为400；（2）定义一个名称为“List1”列表框,字号为11磅，用于显示偶数；（3）定义一个名称为“Command1”，标题为“开始”的按钮，当单击该按钮时，将1到100之间的偶数显示在列表框“List1”中，编写其Click事件代码；（4）定义一个名称为“Command2”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)。

代码编写：1）“开始”按钮Command1的Click事件代码:FOR N=2 TO 100 STEP 2注意：因为列表框的默认类型为字符型，所以加数字进去时要使用函数转换。

2）“关闭”的按钮Command2的Click事件代码:（十四）题目要求：1) 表单的名称为“Form1”，标题为“列表框应用”，高度为260，宽度为400；2) 定义一个名称为“Label1”标题为“你选中的项是”的标签；3) 定义一个名称为“Text1”的文本框，具有只读属性；4) 定义一个名称为“List1”的列表框，数据来源类型为“值”，项的来源为“ A,B,C,D,E”，当选中列表项后，选中的项显示在文本框中，编写其Click事件代码；6) 定义一个名称为“Command1”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)。

代码编写：1）列表框List1的Click事件代码:X=）“关闭”的按钮Command1的Click事件代码:(十五)操作要点：1）“添加到右边”按钮Command1的Click事件代码:2）“关闭”按钮Command2的Click事件代码:三、组合框（十六）题目要求：1) 该表单的名称为“Form1”，标题为“课程选择”，高度为260，宽度为400；2) 定义一个名称为“Combo1”的下拉组合框，数据来源类型为1，列表项的来源设置为“计算机基础,高等数学,大学英语”，编写其Click事件代码，使得选中的列表项显示在文本框中；3）定义一个名称为“Text1”的文本框，字体为12磅字，用于显示列表框选中的列表项；4）定义一个名称为“Command1”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)。

操作要点：1）下拉组合框Combo1的Click事件代码:X=）“关闭”的按钮Command1的Click事件代码:（十七）题目要求：1) 该表单的名称为“Form1”，标题为“成绩表单”，高度为260，宽度为400；2) 将考生文件夹下的自由表添加到表单的数据环境中；3) 定义一个名称为“Combo1”下拉列表框,数据来源类型为“字段”，数据项的来源为cj表中“姓名”字段；4) 定义一个名称为“Text1”的文本框；5）编写下拉列表框的“Click”事件代码，将选中学生所对应的成绩显示在文本框中；6) 定义一个名称为“Command1”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)。