vfp表单所有习题参考答案.doc

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事件代码:写法一：Thisform.Label2.Caption=Thisform.Text1.Value写法二：X=Thisform.Text1.ValueThisform.Label2.Caption=X3）“关闭”的按钮Command2的Click事件代码:Thisform.Release（二）Command1 的CLICK事件代码:if thisform.text1.value=abc thisform.label2.caption=欢迎使用else thisform.label2.caption=密码错误EndifCommand2 的CLICK事件代码:thisform.release（三）代码编写：1) “确定” 按钮Command1 的Click事件代码: If Thisform.text1.value=”ABCD”Messagebox(“欢迎光临”，65，“密码正确“) ElseMessagebox(“禁止进入“，65，”密码错误“) Endif2）“关闭”的按钮 Command2的Click事件代码:Thisform.Release（四）代码编写：1) “确定” 按钮Command1 的Click事件代码: r=val(thisform.text1.value) s=3.1415926*r*r messagebox(str(s,5,2),65,”面积”)2) “关闭”的按钮 Command2的Click事件代码:Thisform.Release（五）题目要求：(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(Thisform.Text1.Value)Thisform.Text2.Value=9/5*X+322）“关闭”的按钮 Command2的Click事件代码:Thisform.Release（六）题目要求：（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(Thisform.Text1.Value) Y=Val(Thisform.Text2.Value)Thisform.Text3.Value=X+Y2）“关闭”的按钮 Command2的Click事件代码: Thisform.Release（七）题目要求：(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(Thisform.Text1.Value)IF MOD(X,2)=0 Thisform.Text2.Value=“这是一个偶数!”ELSEThisform.Text2.Value=“这是一个奇数!”ENDIF2）“关闭”的按钮 Command2的Click事件代码: Thisform.Release（八）代码编写：1）“计算” 按钮Command1 的Click事件代码: x=thisform.text1.value thisform.text2.value=x22）“关闭”的按钮 Command2的Click事件代码: Thisform.Release（九） 代码编写：1）“产生随机数” 按钮Command1 的Click事件代码:法一：x=int(1000*rand()if x=100thisform.text1.value=xEndif法二：x=int(900*rand()+100thisform.text1.value=x2) “判别” 按钮Command2 的Click事件代码: X=thisform.text1.value If mod(x,2)=0 Thisform.label2.caption=“偶数“ Else Thisform.label2.caption=“奇数“ endif3）“关闭”的按钮 Command3的Click事件代码: Thisform.Release（十） 题目要求： (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(Thisform.Text1.Value)Y=Val(Thisform.Text2.Value)Z=Val(Thisform.Text3.Value)Thisform.Backcolor=RGB(X,Y,Z)2）“关闭”的按钮 Command2的Click事件代码: Thisform.Release二、列表框（十一）题目要求：(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事件代码:thisform.text1.value=this.value或:thisform.text1.value=thisform.list1.value4）“关闭”按钮 Command1的Click事件代码: Thisform.Release（十二）题目要求： (1)该表单的名称为“Form1”，标题为“风景区添加”，高度为260，宽度为400；(2)定义一个名称为“Text1”的文本框，字体为10磅字； (3)定义一个名称为“List1”的列表框，数据来源类型为1，列表项的来源设置为“泰山,黄山” (4)定义一个名称为“Command1”，标题为“添加”的按钮，当单击该按钮时，文本框中输入的内容添加到列表框最后,编写其Click事件代码；(5)定义一个名称为“Command2”，标题为“关闭”的按钮，当单击该按钮时，释放该表单 (不得退出VFP系统)。 代码编写：1）“添加” 按钮Command1 的Click事件代码:X=Thisform.Text1.ValueThisform.List1.AddItem(X) 2）“关闭”的按钮 Command2的Click事件代码: Thisform.Release（十三）题目要求：（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 Thisform.List1.AddItem(STR(N,3)ENDFOR注意：因为列表框的默认类型为字符型，所以加数字进去时要使用函数转换。2）“关闭”的按钮 Command2的Click事件代码: Thisform.Release（十四）题目要求：1) 表单的名称为“Form1”，标题为“列表框应用”，高度为260，宽度为400；2) 定义一个名称为“Label1”标题为“你选中的项是”的标签；3) 定义一个名称为“Text1”的文本框，具有只读属性； 4) 定义一个名称为“List1”的列表框，数据来源类型为“值”，项的来源为“ A,B,C,D,E”，当选中列表项后，选中的项显示在文本框中，编写其Click事件代码；6) 定义一个名称为“Command1”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)。代码编写：1）列表框List1 的Click事件代码:X=Thisform.List1.ValueThisform.Text1.Value=X 2）“关闭”的按钮 Command1的Click事件代码:Thisform.Release(十五) 操作要点：1）“添加到右边”按钮 Command1的Click事件代码:thisform.list2.additem(thisform.list1.value)2）“关闭”按钮 Command2的Click事件代码: Thisform.Release三、组合框（十六）题目要求： 1) 该表单的名称为“Form1”，标题为“课程选择”，高度为260，宽度为400；2) 定义一个名称为“Combo1”的下拉组合框，数据来源类型为1，列表项的来源设置为“计算机基础,高等数学,大学英语”，编写其Click事件代码，使得选中的列表项显示在文本框中；3）定义一个名称为“Text1”的文本框，字体为12磅字，用于显示列表框选中的列表项；4） 定义一个名称为“Command1”，标题为“关闭”的按钮，当单击该按钮时，释放该表单 (不得退出VFP系统)。操作要点：1）下拉组合框Combo1 的Click事件代码:X=Thisform.Combo1.ValueThisform.Text1.Value=X 2）“关闭”的按钮 Command1的Click事件代码:Thisform.Release （十七）题目要求：1) 该表单的名称为“Form1”，标题为“成绩表单”，高度为260，宽度为400；2) 将考生文件夹下的自由表cj.dbf添加到表单的数据环境中；3) 定义一个名称为“Combo1”下拉列表框,数据来源类型为“字段”，数据项的来源为cj表中“姓名”字段；4) 定义一个名称为“Text1”的文本框；5）编写下拉列表框的“Click”事件代码，将选中学生所对应的成绩显示在文本框中；6) 定义一个名称为“Command1”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)。操作要点：1）下拉列表框Combo1 的Click事件代码: Thisform.Text1.Value=成绩 2）“关闭”的按钮 Command1的Click事件代码:Thisform.Release四、复选框（十八）(法1)Check1 的Value属性值初始为数值型.复选框Check1 的Click事件代码: IF ThisForm.Check1.Value=1ThisForm.Label1.Fontunderline=.T. ELSEThisForm.Label1.Fontunderline=.F.ENDIF (法2)Check1 的Value属性值初始为逻辑型.复选框Check1 的Click事件代码: IF ThisForm.Check1.Value=.T.ThisForm.Label1.Fontunderline=.T.ELSEThisForm.Label1.Fontunderline=.F.ENDIF （十九）题目要求：(1) 表单的名称为“Form1”，标题为“设置窗口”. (2)定义一个名称为“Label1”、标题为“请输入内容”的标签，字体为加粗、楷体14磅字。(3)定义一个名称为“Text1”高度适中的文本框，Value值为“请观察效果”；(4)定义一个名称为“Check1”，标题为“文本框背景为红色”、Value值为.F.的复选框，当选中该复选框时，“Text1”背景为红色（RGB值为255,0,0）,当未选中该复选框时，“Text1”背景为白色(RGB值为255,255,255)；(5)定义一名称为“Check2”，标题 “文本框前景为蓝色”、Value值为.F.的复选框，当选中该复选框时，“Text1”前景为蓝色(RGB值为0,0,255), 未选中该复选框时，“Text1”前景为黑色(RGB值为0,0,0) (6)定义一个名称为“Command1”，标题为“关闭”的按钮，当单击该按钮时，释放该表单 (不退出VFP系统)。操作要点：1）复选框Check1 的Click事件代码: IF ThisForm.Check1.Value=.T.ThisForm.Text1.BackColor=RGB(255,0,0) ELSE ThisForm.Text1.BackColor=RGB(255,255,255)ENDIF 2）复选框Check2 的Click事件代码: IF ThisForm.Check2.Value=.T. ThisForm.Text1.ForeColor=RGB(0,0,255) ELSE ThisForm.Text1. ForeColor =RGB(0,0,0) ENDIF说明：因为题目要求将CHECK1和CHECK2的初值设为.F.,所以代码里要把复选框写成相应的逻辑型。五、选项按钮组（二十）(1)该表单的名称为“Form1”，标题为“我的表单”，高度为260，宽度为400；(2)定义一个名称为“LABEL1”，标题为“请输入文本内容”的标签,字号为楷体,加粗,14磅字。(3)定义一个名称为“TEXT1”的文本框，字号为16磅字，用于输入文本；(4)定义一个名称为“LABEL2”，标题为“请选择字体”的标签，字体为黑体，加粗，12磅字。(5)定义一个名称为“OPTIONGROUP1”的选项按钮组，标题依次为“宋体”、“隶书”、“黑体”、“幼圆”，当选中某个按钮时，文本框中的字体发生相应的变化，用DO CASE结构编写CLICK事件代码。(6)定义一个名称为“Command1”，标题为“关闭”的按钮，当单击该按钮时释放该表单 (不得退出VFP系统)。操作要点：1）选项按钮组OPTIONGROUP1的CLICK事件代码：do case case this.value=1 thisform.text1.fontname=宋体 case this.value=2 thisform.text1.fontname=隶书 case this.value=3 thisform.text1.fontname=黑体 case this.value=4 thisform.text1.fontname=幼圆Endcase注意：this.value等价于thisform.optiongroup1.value2）关闭按钮COMMAND1的CLCK事件代码：THISFORM.RELEASE（二十一）题目要求：(1)该表单的名称为“Form1”，标题为“字符转换”，高度为260，宽度为400；(2)定义一个名称为“Label1”、标题为“请输入字符串”的标签，字体为加粗12磅字；(3)定义一个名称为“Text1”的文本框，字体为10磅字，用于输入字符串；(4)定义一个名称为“OptionGroup1”的选项按钮组，2个按钮的标题顺序为“转成大写”、“转成小写”，当选中某个按钮时，文本框输入的字符串发生相应的变化，编写“OptionGroup1”的Click事件代码；(5)定义一个名称为“Command1”，标题为“关闭”的按钮，当单击该按钮时，释放该表单 (不得退出VFP系统)操作要点：1）选项按钮组OPTIONGROUP1的CLICK事件代码:x=thisform.text1.valuedo case case this.value=1 thisform.text1.value=upper(x) case this.value=2 thisform.text1.value=lower(x)Endcase2）关闭按钮COMMAND1的CLICK事件代码:Thisform.release六、命令按钮组（二十二）题目要求：(1)该表单的名称为“Form1”，标题为“学生成绩查询”，高度为260，宽度为400；(2)将xdcj.dbf添加到表单的数据环境中(3)将xscj表各字段拖至表单上；(4)定义一个名称为“CommandGroup1”的命令按钮组，4个按钮的标题顺序为“第一条”、“上一条”、“下一条”、“最后一条”当选中某个按钮时，文本框中字符串发生相应的变化，编写“CommandGroup1”的Click事件代码.操作要点：右击命令按钮组，在弹出的快捷菜单上选生成器，弹出“命令组生成器”对话框选“布局”选项卡，按钮布局：水平按钮组各命令按钮的CLICK事件代码如下：1） COMMAND1的CLICK事件代码:go 1thisform.refresh2） COMMAND2的CLICK事件代码:skip -1thisform.refresh3） COMMAND3的CLICK事件代码:Skip 1thisform.refresh4） COMMAND4的CLICK事件代码:go bottomthisform.refresh七、微调控件（二十三）操作要点：1）把spinner1的increment属性设置为1.00，spinnerhighvalue设为40，spinnnerlowvalue设为61） Spinner1的interactivechange事件代码：thisform.text1.fontsize=thisform.spinner1.value2）关闭按钮COMMAND1的CLICK事件代码: thisform.release（二十四）代码编写：1）“设置为表单背景色”按钮COMMAND1事件代码为： x=thisform.spinner1.value y=thisform.spinner2.value z=thisform.spinner3.value thisform.backcolor=rgb(x,y,z)2）关闭按钮COMMAND1的CLICK事件代码: thisform.release七、计时器（二十五）题目要求：(1)该表单的名称为“Form1”，标题为“欢迎光临”，高度为260，宽度为400；(2)定义一个名称为“LABEL1”，标题为“2008北京奥运”的标签,字号为12的加粗蓝色字体(RGB值为0,0,255); (3)定义一个名称为“TIMER1”的计时器,Enabled为.F. ,Interval的值为500,编写Timer事件代码,使得每执行一次代码标签上移10;(4)定义一个名称为“Command1”，标题为“开始”的按钮，当单击该按钮时，标签LABEL1中的内容逐渐向表单上方移动;(5)定义一个名称为“Command2”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)。操作要点：1）TIMER1按钮的TIMER事件代码为:thisform.label1.top=thisform.label1.top-10Command1按钮的CLICK事件代码为:thisform.timer1.enabled=.t.2）“关闭”的按钮 Command2的Click事件代码: Thisform.Release注意：1）不要忘记设置TIMER1的INTERVAL 2）执行过程：开始按钮的CLICK事件代码为激活时钟TIMER1，由TIMER1的CLICK事件代码控制标签的移动。（二十六）代码编写：1）时钟TIMER1按钮的TIMER事件代码为:thisform.label1.left=thisform.label1.left+52）“开始“按钮Command1的CLICK事件代码为:thisform.timer1.enabled=.t.3）“关闭”按钮 Command2的Click事件代码: Thisform.Release（二十七）操作要点：1)自动居中，把label2的aligenment属性设为2-中央2)把label2的caption属性设为空3）把timer1的interval属性设为1000，并在timer1的timer事件代码里写：thisform.label2.caption=time()4）“关闭”按钮 Command2的Click事件代码: Thisform.Release八、页框（二十八)题目要求：(1)该表单的名称为“Form1”，标题为“页框演示”，高度为260，宽度为400；(2)定义一个名称为“Pageframe1”的页框,含有两个页面,分别为“系统编辑”和“退出系统”。(3) 在第一个页面中定义一个名称为“Command1”，标题为“开始”的按钮；(4)在第二个页面中定义一个名称为“Command2”，标题为“关闭”的按钮，当单击该按钮时，释放该表单(不得退出VFP系统)。（二十九）操作要点：1）“放大”按钮CLICK事件代码：thisform.text1.fontsize=thisform.text1.fontsize+32）“缩小”按钮CLICK事件代码：thisform.text1.fontsize=thisform.text1.fontsize-3if thisform.text1.fontsize=10,STR(THISFORM.H,2),0+STR(THISFORM.H,1)FF=IIF(THISFORM.F=10,STR(THISFORM.F,2),0+STR(THISFORM.F,1)SS=IIF(THISFORM.S=10,STR(THISFORM.S,2),0+STR(THISFORM.S,1)THISFORM.TEXT1.VALUE=HH+:+FF+:+SS第3题：编制一个表单完成表文件“学生.dbf”内容的只读浏览显示功能（界面如图例所示）。具体要求如下：1 表单的边框为固定对话框，运行时自动居中，不可移动；2 表单初始显示内容为表文件“学生.dbf”的首记录；3 表单内容将以10秒为间隔自动刷新，即自动顺序向后翻记录，当翻至表底时，将自动回到首记录循环翻动。参考答案：1表单的标题属性Caption设置为“学生表内容只读浏览”；2表单的BorderStyle属性为“2固定对话框”，自动居中属性AutoCenter为.T.;3表单的Movable属性为.F.；4时钟控件Timer1的Interval属性为10000。5表单的Form1的Init事件代码：THIS.SETALL(READONLY,.T.,TEXTBOX)GO TOPTHISFORM.REFRESH6时钟控件Timer1的Timer事件代码：SKIPIF EOF() GO TOPENDIFTHISFORM.REFRESH第4题：编制一个表单完成表文件“学生.dbf”内容的只读浏览显示功能（界面如图例所示）。具体要求如下：1 表单的边框为单线边框，运行时自动居中；2 表单初始显示内容为表文件“学生.dbf”的首记录；3 当按“前翻” “后翻” “首记录” “末记录” 按钮时，表单将自动显示相应记录的内容；4 当翻至表头或表底时，将自动设置相应按钮不可访问。参考答案：1 表单的标题属性Caption设置为“学生表内容只读浏览”；2 表单的BorderStyle属性为“1单线边框”；自动居中属性AutoCenter为.T.3 表单的Form1的Init事件代码：THIS.SETALL(READONLY,.T.,TEXTBOX)GO TOPTHISFORM.REFRESH4 “首记录”按钮Command1的Click事件代码：go mand2.enabled=.mand3.enabled=.mand4.enabled=.mand1.enabled=.f.thisform.refresh5 “前翻”按钮Command2的Click事件代码：skip -1if bof()mand1.enabled=.f.this.enabled=.mand3.enabled=.mand4.enabled=.t.thisform.refresh 6“后翻”按钮Command3的Click事件代码：skipif eof()mand3.enabled=.mand4.enabled=.mand1.enabled=.mand2.enabled=.t.thisform.refresh 7“末记录”按钮Command4的Click事件代码：go mand1.enabled=.mand2.enabled=.mand3.enabled=.mand4.enabled=.f.thisform.refresh第7题：编制一个表单完成表文件“成绩.dbf”内容的查询显示功能（界面如图例所示）。具体要求如下：1 表单的边框为固定对话框，运行时自动居中；2 当用户在组合框（下拉列表）选择班级（学号的左三位）后，表单将自动显示对应班级的所有学生的总平均成绩；3 按“退出”按钮时，自动关闭表单。参考答案：1 表单的标题属性Caption设置为“查询并显示指定班级的总平均成绩”；2 表单的BorderStyle属性为“2固定对话框”；自动居中属性AutoCenter为.T.。3 组合框Combo1的Init事件代码：SET TALK OFFINDEX ON LEFT(学号,3) TO XH UNIQUESCAN THIS.ADDITEM(LEFT(学号,3)ENDSCANSET INDEX TO4 组合框Combo1的Click事件代码：BJ=THIS.VALUEAVERAGE FOR LEFT(学号,3)=BJ 成绩 TO CJTHISFORM.TEXT1.VALUE=CJ5 “退出”按钮Command1的Click事件代码：thisform.release第8题：编制一个表单完成数字时钟显示功能（界面如图例所示）。具体要求如下：1 表单的位置在左上角，可移动，表单的边框为无边框；2 表单将自动以1秒间隔动态显示系统时间；参考答案：表单的标题属性Caption设置为“数字时钟”；表单的位置属性Left为0；Top为0；Movable为.T.；表单的BorderStyle属性为“0无边框”；时钟控件Timer1的Interval属性为1000。文本框Text1的背景色Backcolor为RGB(255,255,255)；FONTNAME为“隶书”。时钟控件Timer1的Timer事件代码：s=substr(time(),1,2)f=substr(time(),4,2)m=substr(time(),7,2)thisform.text1.value=s+时+f+分+m+秒第10题：编制一个表单完成表文件“成绩.dbf”和“课程.dbf”内容的查询显示功能（界面如图所示）。具体要求如下：1 表单运行时自动居中，不可移动；2 当用户在组合框（下拉列表）选择课程后，表单将自动显示该课程的总平均成绩；3按“退出”按钮时，自动关闭表单。参考答案：1表单的标题属性Caption设置为“查询并显示指定课程的总平均成绩”；2表单的自动居中属性AutoCenter为.T.;3表单的Movable属性为.F.；4组合框Combo1的RowSouceType属性为“6-字段”，RowSouce属性为“课程.课程名”。5组合框Combo1的Click事件代码：SET TALK OFFSELECT 课程KCH=课程号SELECT 成绩AVERAGE FOR 课程号=KCH 成绩 TO CJTHISFORM.TEXT1.VALUE=CJ6.“退出”按钮Command1的Click事件代码：thisform.release第11题：编制一个表单完成表文件“学生.dbf”内容的信息查询功能（界面如图例所示）。具体要求如下：表单的边框为固定对话框，运行时自动居中，不可移动；表单的文本框中输入需查询学生的学号。参考答案：1表单的标题属性Caption设置为“学生表信息查询”；2表单的BorderStyle属性为“2固定对话框”，自动居中属性AutoCenter为.T.;表单的Movable属性为.F.；标签Label2的Forecolor属性为“255,255,255”；FontSize属性为“16”；表单的Form1的Init事件代码：use 学生 thisform.setall(visible,.f.)thisform.label1.visible=.t.thisform.text1.visible=.t.表单的Form1的destroy事件代码：use7.文本框Text1的Valid事件代码：loca for alltrim(学号)=alltrim(this.value)if found()thisform.label2.caption=thisform.setall(visible,.t.)elsethisform.setall(visible,.f.)thisform.label1.visible=.t.thisform.text1.visible=.t.thisform.label2.visible=.t.thisform.label2.caption=您所指定的学生并不存在！endifthisform.refreshreturn .t.第12题：根据要求，用表单设计器建立一个“按钮组调色板”表单（界面如图例所示）。具体要求如下：1 表单的标题为“按钮组调色板”， 表单运行时，当按某个命令按钮后，表单的背景色就会变成按钮指定的对应颜色。参考答案：1 表单的标题属性Caption设置为“按钮组调色板”；2 命令按钮组Commandgroup1的Click事件代码：do case case this.value=1thisform.backcolor=rgb(225,0,0)case this.value=2thisform.backcolor=rgb(0,255,0)case this.value=3thisform.backcolor=rgb(0,0,255)case this.value=4thisform.backcolor=rgb(0,0,0)case this.value=5thisform.backcolor=rgb(225,255,255)endcasethisform.refresh第13题：根据要求，用表单设计器建立一个“按钮组调色板”表单（界面如图例所示）。具体要求如下：1.表单的标题为“按钮组调色板”， 表单运行时，当按某个命令按钮后，命令按钮组的背景色就会变成按钮指定的对应颜色。参考答案：1.表单的标题属性Caption设置为“按钮组调色板”；2.命令按钮组Commandgroup1的Click事件代码：do case case this.value=1this.backcolor=rgb(225,0,0)case this.value=2this.backcolor=rgb(0,255,0)case this.value=3this.backcolor=rgb(0,0,255)case this.value=4this.backcolor=rgb(0,0,0)case this.value=5this.backcolor