vfp表单所有习题参考答案

合集下载

VFP程序设计基础-表单设计练习

VFP程序设计基础-表单设计练习

1.扩展名为SCX的文件是( )。

•A、备注文件•B、项目文件•C、表单文件•D、菜单文件参考答案: C2.在当前表单的LABEL1控件中显示系统时间的语句是()。

•A、BEL1.CAPTION=TIME()•B、BEL1.VALUE=TIME()•C、BEL1.TEXT=TIME()•D、BEL1.CONTROL=TIME()参考答案: A3.以下叙述与表单数据环境有关,其中正确的是()。

•A、当表单运行时,数据环境中的表处于只读状态,只能显示不能修改•B、当表单关闭时,不能自动关闭数据环境中的表•C、当表单运行时,自动打开数据环境中的表•D、当表单运行时,与数据环境中的表无关参考答案: C4.在Visual FoxPro中,运行表单T1.SCX的命令是()。

•A、DO T1•B、RUN FORM1 T1•C、DO FORM T1•D、DO FROM T1参考答案: C5.假定一个表单里有一个文本框Text1和一个命令按钮组Comman dGroup1,命令按钮组是一个容器对象,其中包含Command1 和Command2两个命令按钮。

如果要在Command1命令按钮的某个方法中访问文本框的value属性值,下面哪个式子是正确的?()。

•A、ThisForm.Text1.value•B、This.Parent.value•C、Parent.Text1.value•D、this.Parent.Text1.value参考答案: A6.假设表单上有一选项组:●男○女,如果选择第二个按钮“女”,则该项组Value属性的值为________。

•A、.F.•B、女•C、 2•D、女或2参考答案: D7.关闭当前表单的程序代码是ThisForm.Release,其中的Release 是表单对象的()。

•A、标题•B、属性•C、事件•D、方法参考答案: D8.指定用户能否在列表框控件内进行多重选定的列表框属性是()•A、Value属性•B、ControlSource•C、Selected•D、MultiSelect参考答案: D9.假设表单My Form隐藏着,让该表单在屏幕上显示的命令是____ ____。

vfp表单设计应用练习题及答案

vfp表单设计应用练习题及答案

VFP6.0第7章表单设计与应用及答案一、填空题:1、根据表单数据来源进行分类,表单可以分为_自由表、_数据库表_和_视图_3种类型。

2、表单数据源可以使用数据库表、_自由表_或__视图__。

3、在使用表单向导创建的表单中,按钮类型可以是_文本按钮_、_图片按钮、无按钮和定制4种类型。

4、表单文件默认的扩展名为_.scx__。

5、表单“属性”窗口由对象列表框、选项卡、_属性设置框、属性列表框和__属性说明信息_组成。

6、根据VisualFoxPro6.0中的控件对象基于所属的类可以分为__容器__类和_控件_类。

7、标签控件属性Caption的含义是_____指定标签的标题文本_____,Name的含义是_指定在代码中用以引用对象的名称_。

8、文本框控件属性ControlSource的含义是_为文本框绑定数据源_。

10、组合框控件属性RowSource和ControlSource的含义分别是_指明组合框中条目的数据源_、_为组合框绑定数据源_。

二、单项选择题:1、使用表单向导创建表单,在“表单样式”对话框中可以确定(D)。

A.表和字段B.表和样式C.视图和按钮D.样式和按钮2、在命令窗口执行表单文件AA,应键入命令(A)。

A.DO FORM AAB.DO AA.scxC.RUN FORM AAD.RUN AA.xcx3、在表单中添加字符型字段控件,系统生成的是( A )。

A.文本框B.编辑框C.OLE绑定型控件D.复选框4、下列表单控件中属于容器类的是( C )。

A.列表框、组合框、命令按钮、页面、表格B.列表框、组合框、命令按钮、线条C.命令按钮组、选项按钮组、页面、表格D.命令按钮组、选项按钮组、图像、表格5、在VisualFoxPro6.0中,表单是指( D )。

A.数据库中各个表的清单B.一个表中各个记录的清单C.数据库查询的列表D.窗口界面6、表单对象中可以包括的控件是( D )。

A.任意控件B.所有容器对象C.页框或任意控件D.页框、任意控件、容器或自定义对象7、在VisualFoxPro6.0中,标签控件默认的名字是( B )。

最新版VFP课后习题参考答案

最新版VFP课后习题参考答案

最新版VFP课后习题参考答案第一章一选择题1~8 CACCCDDD二填空题1数据库管理系统/DBMS 2冗余度3元数据4概念层5属性6完整性规则7实体完整性8信息流第二章一选择题1~5 CCDCA/D(第五题有两个答案,这个D应该是印刷错误,旧版中是TTOC)6~10 CCCCB 二填空题1.ctrl+enter 2 .SHIFT 3. SET ESCAPE ON/OFF 4. PJX和PJT5.全局 6 .DIMENSION 7. save to mVar all like c* 8. 10 ,8 9. messageb( )第三章一选择题1~5 DCBAC 6~10 AAAAC(第一题中的选项D少了个0,应为30000多)二填空题1. 2552. ctrl+home3.ADDITIVE4. Y5. drop column by6. select 07. xs和w208. freeze9. zap 10. .CDX第四章一选择题1~7 BCA(CD)DDD(第4题C和D选项都对)二填空题1.完全联接2. DISTINCT3. Union4. To file5. subs(bm.zkz,4,2) 、group by 16. month(csrq)、100*count(*) 、Desc7. Dist 、count(*) 、1 8. 09. 1 10. iif(KS.cj>59,1,0) , 4 DESC第五章一选择题1~5 DDCCD 6~10 DCADC二填空题1.FXP2. ESC3.i<=10 、?CHR(K)4. 10 155. nsum+jc(n)/jc(n+1) , to x6. mod(mod(num,16),10)+65(或55+MOD(num,16))、num17.封装性8. 属性9. ERROR 10 . 容器对象11._screen.Caption 12.thisformset第六章一选择题1~5 CBAAB 6~10 DCBDA二填空题1. 集合2. 顶层表单3. Load、activate4. 确定(\<Y)5. passwordchar6. 07.下拉列表框8. 0~999. Interval 10.Enabled11. thisform.cmg.cmd2.enabled=.f. 或者this.parent.cmd2.enablede=.f.12. text1.value 13.文本框14.setall15.ColumnS(i) (COLUMN后必须加S,即COLUMNS(i)。

VFP课后习题参考答案

VFP课后习题参考答案

第1章一、选择题1、A2、D(8.0)3、D4、D5、B6、C7、B8、B二、填空题1、命令窗口方式、菜单方式、“关闭”按钮方式、Alt+F4、“控制”菜单2、Ctrl+W、Ctrl+Q、ESC3、交互操作方式、程序执行方式三、简答题(略)第2章一、选择题1、C、B2、C3、C、A4、B5、C6、C7、B8、D9、B 10、B 11、B 12、B 13、A 14、D 15、A 16、B17、D 18、D 19、D 20、D 21、C 22、A 23、B 24、B二、填空题1、自由表、数据库表2、主索引、侯选索引、普通索引、惟一索引3、控制表间记录指针4、字段有效性、记录有效性5、Replace all总分 with 数学+英语+电子[or sum(数学,英语,电子)],平均分 with 总分/3[or avg(数学,英语,电子)]6、表结构、记录数据7、 68、单索引文件、复合索引文件9、AVERAGE、TOTAL10、级联11、备注型、通用型12、Replace all 奖学金 with 奖学金*(1+0.1)for avg(英语,计算机)>=8513、C、N、D、M三、判断题1、F2、F3、T4、T5、T四、应用题1.Use ts.dbf in 1; Use dz.dbf in 2; Use jy.dbf in 3 2.Select 1(or use ts.dbf); browse3.Use ts.dbf; copy structure to ts1.dbf; use ts1.dbf; list structure4.Use ts.dbf; average 单价5.Total on 出版单位 to tsdj fields 单价6.Select * from ts!dz to screen where 单位=”计算机系”7.Select 2(or use dz.dbf); count for 职称=”教授” to n; ?n 8.Select * from ts!jy to screen where 借书证号=”119”9.Select * from ts!dz,ts!jy into dbf czjg where (jy.借阅日期<{^1997/10/01}).and.(dz.职称="副教授").and.(jy.借书证号=dz.借书证号); use czjg; browse10.Select 3(or use jy.dbf); index on 总编号to zbh; set relation to 总编号 into jy; Select 借书证号,书名,借阅日期 from ts!ts,ts!jy to screen where (ts.总编号=”332211”).and.(ts.总编号=jy.总编号)第3章一、选择题1、B2、A3、A4、A5、C6、C7、D8、A9、B10、C 11、B 12、C 13、B 14、B 15、B 16、D 17、C 18、D19、B 20、C 21、D 22、C 23、B 24、C 25、C 26、C 27、B28、C 29、D 30、D二、填空题14、SUBSTR()15、66622216、姓名,出生年月,总分17、6、N、D18、.T.三、判断题1、F2、T3、T4、T5、T6、T7、F四、阅读下列程序,写出程序结果1、-3,42、122.00、233、XSCJ.DBF中所有记录的平均成绩4、W102 王兰 195、242 191 161 在学生.dbf中求学号为9921101、9921102、9921103的学生的总成绩19、主程序中X=同学们主程序中Y=你们好!子程序中X= 100子程序中Y= 2子程序中Z= 300返回主程序后X=同学们返回主程序后Y= 2返回主程序后Z= 300五、阅读分析下列程序,在处填上适当的内容,使程序完整。

VFP题库及标准答案

VFP题库及标准答案

VFP题库及标准答案一、选择题(共40道,每道1分)1、在下面的数据类型中默认值规定为0的是 ( a)A、数值型B、字符型C、逻辑型D、日期型2、在下面的Visual FoxPro表达式中,不正确的是 (c)A、{^2002-05-01 10:10:10 AM}-10B、{^2002-05-01}-DATE()C、{^2002-05-01}+DATE()D、{^2002-05-01}+103、假定已经执行了命令M=&quot;28+2&quot;, 再执行?&amp;M,屏幕显示的结果是: ( b)A、30B、28+2C、[28+2]D、30.004、下面关于Visual FoxPro数组的叙述中,错误的是 ( c )A、用DIMENSION和DECLARE都可以定义数组B、Visual FoxPro支持一维数组和二维数组C、一个数组中各个数组元素必须是同一种数据类型D、新定义数组的各个数组元素初值为.F.5、在VFP系统下,文件名中哪个是不合法的 (c)A、teacherB、student_12C、stu dentD、s1236、表达式VAL(&quot;ABC12&quot;)+100的结果是 (a)A、数值型B、字符型C、逻辑型D、表达式非法7、要为当前表中所有性别为“女”的职工增加100元工资,应使用命令( b ) 。

A、replace all 工资 with 工资+100B、replace 工资 with 工资+100 for 性别='女'C、change all 工资 with 工资+100D、change all 工资 with 工资+100 for 性别='女'8、?AT(&quot;学生&quot;,&quot;中文系学生&quot;)命令显示的结果是(a)A、7B、4C、.T.D、19、在VFP中,用来指定以共享方式打开表文件的子句是( )。

vfp试题及答案

vfp试题及答案

vfp试题及答案一、单项选择题(每题2分,共10分)1. Visual FoxPro中,用于创建表单的命令是()。

A. CREATE FORMB. CREATE FORMSC. FORMD. FORMS答案:A2. 在Visual FoxPro中,使用()命令可以打开一个表。

A. OPEN TABLEB. USEC. BROWSED. DISPLAY答案:B3. 以下哪个选项不是Visual FoxPro的数据类型?()A. NumericB. CharacterC. DateD. Boolean答案:D4. 在Visual FoxPro中,要将一个表的所有记录显示在屏幕上,可以使用()命令。

A. LISTB. DISPLAYC. BROWSED. REPORT答案:C5. Visual FoxPro中,用于将数据从一个表复制到另一个表的命令是()。

A. COPY TOB. INSERT INTOC. SELECT INTOD. APPEND答案:D二、填空题(每题2分,共10分)1. 在Visual FoxPro中,使用________命令可以创建一个新的数据库。

答案:CREATE DATABASE2. 使用________命令可以关闭当前数据库。

答案:CLOSE DATABASE3. ________命令用于在Visual FoxPro中打开一个数据库。

答案:USE4. ________命令用于在Visual FoxPro中关闭一个表。

答案:CLOSE TABLE5. ________命令用于在Visual FoxPro中删除一个表。

答案:DELETE TABLE三、简答题(每题5分,共10分)1. 简述Visual FoxPro中如何使用SQL语句创建表。

答案:在Visual FoxPro中,可以使用CREATE TABLE语句创建表。

例如,CREATE TABLE Students (ID C(5), Name C(20), Age N(3,0))。

vfp表单和控件练习题

vfp表单和控件练习题

VFP表单和控件练习题1. 单选题:(分)在下列VFP的基类中,无CAPTION属性的基类是_________A.标签B.文本框…选项按钮C.D.复选框解答:B参考答案: B、2. 单选题:(分)将某个控件绑定到一个字段,移动记录后字段的值发生变化,这时该控件的_______属性的值也随之变化。

A.:ValueC.CaptionD.没有解答:;A参考答案: A3. 单选题:(分)用户在VFP中创建子类或表单时,不能新建的是______________.[属性A.B.方法C.事件D.事件的方法代码!C解答:参考答案: C4. 单选题:(分)]如果要引用一个控制所在的直接容器对象,则可以使用下列_____属性。

A.THISB.THISFORMC.PARENTD.、都可以解答:C参考答案: C。

5. 单选题:(分)命令按钮中显示的文字内容,是在属性_______中设置的。

B.CaptionC.FontName》ControlSourceD.解答:B参考答案: B(6. 单选题:(分)当用鼠标使组合框的内容发生变化时,将首先触发_______事件。

A.InteractiveChangeB.ClickC.-InitD.DownClick解答:A参考答案: A|7. 单选题:(分)若要建一个有5个按钮的选项组,应将属性_____的值改为5。

A.OptiongroupB.Buttoncount&BoundColumnC.D.ControlSource解答:B参考答案: B~8. 单选题:(分)VFP系统环境下,运行表单的命令为_______。

A.DO FORM <表单名>B.^REPORT FORM <表单名>C.DO <表单名>D.只能在项目管理器中运行解答:A参考答案: A&9. 单选题:(分)建立事件循环的命令为______ 。

A.READ EVENTS.CLEAR EVENTSB.C.DO WHILE……ENDDOD.FOR………ENDFOR解答:A}参考答案: A10. 单选题:(分)设有一个页框含有3个页面,其中第一个页面的名字为Page1,上面有二个命令按钮:CmdOk、CmdPrint,如果要在CmdPrint的Click事件中引用CmdOk的Click事件代码,则采用_______ 。

vfp表单所有习题参考答案

vfp表单所有习题参考答案

VFP表单实验参考讲义一、标签和文本框一题目要求:1该表单的名称为“Form1”,标题为“密码输入窗口”,高度为190,宽度为300;2定义一个名称为“Label1”、标题为“请输入密码”、字号为10磅的标签;3定义一个名称为“Text1”的文本框,用于输入密码,当输入密码时,屏幕显示“”; 4定义一个名称为“Label2”的标签,标题为空,自动调整控件大小; 5定义一个名称为“Command1”,标题为“显示密码”的按钮,当单击该按钮时,标签“Label2”显示输入的密码,编写Click事件代码6定义一个名称为“Command2”,标题为“关闭”的按钮,当单击该按钮时,释放该表单;不得退出VFP系统操作要点:1注意将text1的属性passwordchar设置为:2label2的属性autosize设置为:.T.3 “显示密码”按钮Command1的Click事件代码:写法一:写法二:X=X3“关闭”的按钮Command2的Click事件代码:二Command1 的CLICK事件代码:欢迎使用"else密码错误"EndifCommand2 的CLICK事件代码:三代码编写:1)“确定”按钮Command1的Click事件代码: I”ABCD”Messagebox“欢迎光临”,65,“密码正确“ElseMessagebox“禁止进入“,65,”密码错误“Endif2“关闭”的按钮Command2的Click事件代码:四代码编写:1“确定”按钮Command1的Click事件代码:rs=rrmessageboxstrs,5,2,65,”面积”2 “关闭”的按钮Command2的Click事件代码:五题目要求:1 该表单的名称为“Form1”,标题为“温度转换”,高度为260,宽度为400;2 定义一个名称为“Label1”标题为“摄氏温度”的标签;再定义一个名称为“Label2”标题为“华氏温度”的标签,两个标签的字号均为11磅;3 定义一个名称为“Text1”的文本框,用于输入摄氏温度,再定义一个名称为“Text2”的文本框,具有只读属性,用于显示华氏温度;4 定义一个名称为“Command1”,标题为“转换”的按钮,当单击该按钮时,将输入的摄氏温度转换成华氏温度并显示在Text2文本框中,编写其Click事件代码;其中:华氏温度=9/5摄氏温度+325 定义一个名称为“Command2”,标题为“关闭”的按钮,当单击该按钮时,释放该表单不得退出VFP系统;操作要点:1文本框text2的readonly属性设置为.T.2“转换”按钮Command1的Click事件代码:X=Val9/5X+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=ValY=ValX+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 MODX,2=0这是一个偶数”ELSE这是一个奇数”ENDIF2“关闭”的按钮Command2的Click事件代码:八代码编写:1“计算”按钮Command1的Click事件代码:2“关闭”的按钮Command2的Click事件代码:九代码编写:1“产生随机数”按钮Command1的Click事件代码:法一:x=int1000randif x>=100Endif法二:x=int900rand+1002 “判别”按钮Command2的Click事件代码:XIf modx,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系统;操作要点:1Command1的Click事件代码:X=ValY=ValZ=Val=RGB X,Y,Z2“关闭”的按钮Command2的Click事件代码:二、列表框十一题目要求:1该表单的名称为“Form1”,标题为“列表框应用”,高度为260,宽度为400;2定义一个名称为“LABEL1”,标题为“你的选择是”的标签;2定义一个名称为“TEXT1”的文本框,具有只读属性;3定义一个名称为“List1”的列表框,数据来源类型为值,列表项的来源设置为“神州5号,神州6号,嫦娥1号”,当选中列表项后,选中的项显示在文本框中,编写其CLICK事件代码;4定义一个名称为“Command1”,标题为“关闭”的按钮,当单击该按钮时,释放该表单不得退出VFP系统;操作要点:1TEXT1的只读设置: READONLY属性设为.T.2LIST1的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 系统;操作要点:1下拉列表框Combo1的Click事件代码:成绩2“关闭”的按钮Command1的Click事件代码:四、复选框十八法1Check1 的Value属性值初始为数值型.复选框Check1的Click事件代码:IF ELSE法2Check1 的Value属性值初始为逻辑型.复选框Check1的Click事件代码:IF十九题目要求: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 ELSE2复选框Check2的Click事件代码:IF ELSE. ForeColor =RGB0,0,0ENDIF说明:因为题目要求将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 casecase =1宋体"case =2隶书"case =3黑体"case =4幼圆"Endcase注意:2关闭按钮COMMAND1的CLCK事件代码:二十一题目要求:1该表单的名称为“Form1”,标题为“字符转换”,高度为260,宽度为400;2定义一个名称为“Label1”、标题为“请输入字符串”的标签,字体为加粗12磅字;3定义一个名称为“Text1”的文本框,字体为10磅字,用于输入字符串;4定义一个名称为“OptionGroup1”的选项按钮组,2个按钮的标题顺序为“转成大写”、“转成小写”,当选中某个按钮时,文本框输入的字符串发生相应的变化,编写“OptionGroup1”的Click事件代码;5定义一个名称为“Command1”,标题为“关闭”的按钮,当单击该按钮时,释放该表单不得退出VFP系统操作要点:1选项按钮组OPTIONGROUP1的CLICK事件代码:do casecase =1case =2Endcase2关闭按钮COMMAND1的CLICK事件代码:六、命令按钮组二十二题目要求:1该表单的名称为“Form1”,标题为“学生成绩查询”,高度为260,宽度为400;2将添加到表单的数据环境中3将xscj表各字段拖至表单上;4定义一个名称为“Command Group1”的命令按钮组,4个按钮的标题顺序为“第一条”、“上一条”、“下一条”、“最后一条”当选中某个按钮时,文本框中字符串发生相应的变化,编写“CommandGroup1”的Click事件代码.操作要点:右击命令按钮组,在弹出的快捷菜单上选生成器,弹出“命令组生成器”对话框选“布局”选项卡,按钮布局:水平按钮组各命令按钮的CLICK事件代码如下:1)COMMAND1的CLICK事件代码:go 12)COMMAND2的CLICK事件代码:skip -13)COMMAND3的CLICK事件代码:Skip 14)COMMAND4的CLICK事件代码:go bottom七、微调控件二十三操作要点:1把spinner1的increment属性设置为,spinnerhighvalue设为40,spinnnerlowvalue设为61)Spinner1的interactivechange事件代码:2关闭按钮COMMAND1的CLICK事件代码:二十四代码编写:1“设置为表单背景色”按钮COMMAND1事件代码为:=rgbx,y,z2关闭按钮COMMAND1的CLICK事件代码:七、计时器二十五题目要求: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系统;操作要点:1TIMER1按钮的TIMER事件代码为:Command1按钮的CLICK事件代码为:2“关闭”的按钮 Command2的Click事件代码:注意:1不要忘记设置TIMER1的INTERVAL2执行过程:开始按钮的CLICK事件代码为激活时钟TIMER1,由TIMER1的CLICK事件代码控制标签的移动;二十六代码编写:1时钟TIMER1按钮的TIMER事件代码为:2“开始“按钮Command1的CLICK事件代码为:.3“关闭”按钮 Command2的Click事件代码:1自动居中,把label2的aligenment属性设为2-中央2把label2的caption属性设为空3把timer1的interval属性设为1000,并在timer1的timer事件代码里写:4“关闭”按钮 Command2的Click事件代码:八、页框二十八题目要求:1该表单的名称为“Form1”,标题为“页框演示”,高度为260,宽度为400;2定义一个名称为“Pageframe1”的页框,含有两个页面,分别为“系统编辑”和“退出系统”;3 在第一个页面中定义一个名称为“Command1”,标题为“开始”的按钮;4在第二个页面中定义一个名称为“Command2”,标题为“关闭”的按钮,当单击该按钮时,释放该表单不得退出VFP系统;1“放大”按钮CLICK事件代码:2“缩小”按钮CLICK事件代码:endif3“还原”按钮CLICK事件代码:九、数据环境三十代码编写:1 “查询”按钮Command1的Click事件代码:G3“关闭”按钮Command2的Click事件代码:三十一代码编写:1)组合框combo1的click事件代码:2“关闭”按钮Command2的Click事件代码:三十二1“commandgroup1”的click事件代码:n=do casecase n=1if .not. bofskip -1endifcase n=2if .not. eofskipendifif eofskip -1endifendcase2“关闭”按钮Command2的Click事件代码:VFP程序设计题第2题:编制一个表单完成计数器计数显示功能界面如图例所示,图例文件为.JPG;具体要求如下:1.表单的边框为固定对话框,运行时自动居中,不可移动;2.表单初始显示状态为全零“00:00:00”;3.按“计数”按钮后,自动以秒为单位从零开始计数设:时的计数属性名为F,分的计数属性名为H,秒的计数属性名为S并在表单上动态显示;4.按“停止”按钮后暂停计数,按“计数”按钮可以继续计数;参考答案:1.表单的标题属性Caption设置为“计数器”;2.表单的BorderStyle属性为“2—固定对话框”,自动居中属性AutoCenter 为.T.;3.表单的Movable属性为.F.;4.时钟控件Timer1的Interval属性为1000; 5.表单的Form1的Init事件代码:STOR 0 TO ,,6.“计数”按钮Command1的Click事件代码:7.“停止”按钮Command2的Click事件代码:8.时钟控件Timer1的Timer事件代码:=+1IF =60=+1=0ENDIFIF =60=+1=0ENDIFIF =60=+1=0ENDIFHH=IIF>=10,STR,2,'0'+STR,1FF=IIF>=10,STR,2,'0'+STR,1SS=IIF>=10,STR,2,'0'+STR,1第3题:编制一个表单完成表文件“学生.dbf”内容的只读浏览显示功能界面如图例所示;具体要求如下:1.表单的边框为固定对话框,运行时自动居中,不可移动;2.表单初始显示内容为表文件“学生.dbf”的首记录;3.表单内容将以10秒为间隔自动刷新,即自动顺序向后翻记录,当翻至表底时,将自动回到首记录循环翻动;参考答案:1.表单的标题属性Caption设置为“学生表内容只读浏览”;2.表单的BorderStyle属性为“2—固定对话框”,自动居中属性AutoCenter 为.T.;3.表单的Movable属性为.F.;4.时钟控件Timer1的Interval属性为10000;5.表单的Form1的Init事件代码:"READONLY",.T.,"TEXTBOX"GO TOP6.时钟控件Timer1的Timer事件代码:SKIPIF EOFGO TOPENDIF第4题:编制一个表单完成表文件“学生.dbf”内容的只读浏览显示功能界面如图例所示;具体要求如下:1.表单的边框为单线边框,运行时自动居中;2.表单初始显示内容为表文件“学生.dbf”的首记录;3.当按“前翻”“后翻”“首记录”“末记录”按钮时,表单将自动显示相应记录的内容;4.当翻至表头或表底时,将自动设置相应按钮不可访问;参考答案:1.表单的标题属性Caption设置为“学生表内容只读浏览”;2.表单的BorderStyle属性为“1—单线边框”;自动居中属性AutoCenter为.T.3.表单的Form1的Init事件代码:"READONLY",.T.,"TEXTBOX"GO TOP4.“首记录”按钮Command1的Click事件代码:go top5.“前翻”按钮Command2的Click事件代码:skip -1if bof=.f.endif6.“后翻”按钮Command3的Click事件代码:skipif eofendif7.“末记录”按钮Command4的Click事件代码:go bottom第7题:编制一个表单完成表文件“成绩.dbf”内容的查询显示功能界面如图例所示;具体要求如下:1.表单的边框为固定对话框,运行时自动居中;2.当用户在组合框下拉列表选择班级学号的左三位后,表单将自动显示对应班级的所有学生的总平均成绩;3.按“退出”按钮时,自动关闭表单;参考答案:1.表单的标题属性Caption设置为“查询并显示指定班级的总平均成绩”;2.表单的BorderStyle属性为“2—固定对话框”;自动居中属性AutoCenter 为.T.;3.组合框Combo1的Init事件代码:SET TALK OFFINDEX ON LEFT学号,3 TO XH UNIQUESCANLEFT学号,3ENDSCANSET INDEX TO4.组合框Combo1的Click事件代码:BJ=AVERAGE FOR LEFT学号,3=BJ 成绩 TO CJ5.“退出”按钮Command1的Click事件代码:第8题:编制一个表单完成数字时钟显示功能界面如图例所示;具体要求如下:1.表单的位置在左上角,可移动,表单的边框为无边框;2.表单将自动以1秒间隔动态显示系统时间;参考答案:表单的标题属性Caption设置为“数字时钟”;表单的位置属性Left为0;Top为0;Movable为.T.;表单的BorderStyle属性为“0—无边框”;时钟控件Timer1的Interval属性为1000;文本框Text1的背景色Backcolor为RGB255,255,255;FONTNAME为“隶书”;时钟控件Timer1的Timer事件代码:s=substrtime,1,2f=substrtime,4,2m=substrtime,7,2第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 CJ6.“退出”按钮Command1的Click事件代码:第11题:编制一个表单完成表文件“学生.dbf”内容的信息查询功能界面如图例所示;具体要求如下:表单的边框为固定对话框,运行时自动居中,不可移动;表单的文本框中输入需查询学生的学号;参考答案:1.表单的标题属性Caption设置为“学生表信息查询”;2.表单的BorderStyle属性为“2—固定对话框”,自动居中属性AutoCenter 为.T.;表单的Movable属性为.F.;标签Label2的Forecolor属性为“255,255,255”;FontSize属性为“16”;表单的Form1的Init事件代码:use 学生"visible",.f.表单的Form1的destroy事件代码:use7.文本框Text1的Valid事件代码:loca for alltrim学号=alltrimif found"visible",.t.else"visible",.f.endifreturn .t.第12题:根据要求,用表单设计器建立一个“按钮组调色板”表单界面如图例所示;具体要求如下:1.表单的标题为“按钮组调色板”, 表单运行时,当按某个命令按钮后,表单的背景色就会变成按钮指定的对应颜色;参考答案:1.表单的标题属性Caption设置为“按钮组调色板”;2.命令按钮组Commandgroup1的Click事件代码:do casecase =1=rgb225,0,0case =2=rgb0,255,0case =3=rgb0,0,255case =4=rgb0,0,0case =5=rgb225,255,255endcase第13题:根据要求,用表单设计器建立一个“按钮组调色板”表单界面如图例所示;具体要求如下:1.表单的标题为“按钮组调色板”, 表单运行时,当按某个命令按钮后,命令按钮组的背景色就会变成按钮指定的对应颜色;参考答案:1.表单的标题属性Caption设置为“按钮组调色板”;2.命令按钮组Commandgroup1的Click事件代码:do casecase =1=rgb225,0,0case =2=rgb0,255,0case =3=rgb0,0,255case =4=rgb0,0,0case =5=rgb225,255,255endcase第15题:根据要求,用表单设计器建立一个“选项按钮组调色板”表单界面如图例所示;具体要求如下:1.表单的标题为“选项按钮组调色板”, 表单运行时,当按某个命令按钮后,选项按钮组的背景色就会变成按钮指定的对应颜色;参考答案:1.表单的标题属性Caption设置为“选项按钮组调色板”;2. 选项按钮组Optiongroup1的Click事件代码:do casecase =1case =2case =3case =4case =5endcase第16题:编制一个表单完成表文件“学生.dbf”内容的信息查询功能界面如图例所示;具体要求如下:1.表单的列表框中选择需查询学生的姓名;2.所有文本框Text为只读;参考答案:1.表单的标题属性Caption设置为“学生表信息查询”;2.所有文本框Text的ReadOnly属性为“.T.”;3.表单的Form1的Init事件代码:use 学生"visible",.f.,"textbox""visible",.f.,"label"4.表单的Form1的destroy事件代码:use5.列表框List1的Interactivechange事件代码:"visible",.t.第17题:编制一个表单完成表文件“学生.dbf”内容的信息查询功能界面如图例所示;具体要求如下:1.表单的组合框中选择需查询学生的姓名;2.所有文本框Text为只读;参考答案:1.表单的标题属性Caption设置为“学生表信息查询”;2.Combo1的Rowsourcetype为“6-字段”,Rowsource为“学生.姓名”;3.所有文本框Text的ReadOnly属性为“.T.”;4.表单的Form1的Init事件代码:use 学生"visible",.f.,"textbox""visible",.f.,"label"5.表单的Form1的destroy事件代码:use6.列表框Combo1的Interactivechange事件代码:"visible",.t.第19题:根据要求,用表单设计器建立一个时钟表单界面如图例所示;具体要求如下:1.表单只有标题为“信息窗”;2.当时钟的分为奇数时,表单的背景色为绿色,偶数时为蓝色;3.显示的内容为只读;参考答案:1.表单的标题属性Caption设置为“信息窗”;2.时钟控件Timer1的Timer事件代码:S=SUBSTRTIME,1,2F=SUBSTRTIME,4,2M=SUBSTRTIME,7,2MN=VALfIF INTMN/2=MN/2=RGB0,0,255ELSE=RGB0,255,0ENDIF第20题:根据要求,用表单设计器建立一个“人工翻动日历牌”表单界面如图例所示;具体要求如下:1.编制一个日历的表单,表单的标题为“人工翻动日历牌”,文本框为只读,显示的日期格式为“年月日”,年份为4位;2.当表单运行时,显示当前日期,用户可以通过微调按钮向前或向后翻动日期;参考答案:1.表单的标题属性Caption设置为“人工翻动日历牌”;2.微调Spinner1的Downclick事件代码:3.微调Spnnier1的Upclick事件代码:第21题:根据要求,用表单设计器建立一个“选页调色板”表单界面如图例所示;具体要求如下:1.表单的标题为“选页调色板”, 表单运行时,当按某个命令按钮后,该页框的背景色就会变成按钮指定的对应颜色;参考答案:1.表单的标题属性Caption设置为“选页调色板”;2. 选项按钮组Pageframe1的Click事件代码:do casecase =1case =2case =3case =4case =5endcase第22题:根据要求,用表单设计器建立一个如图所示的表单界面如图例所示;1.表单的标题属性Caption设置为“新建”;2. 选项按钮组Optiongroup1的Click事件代码:do casecase =1creacase =2crea formcase =3modify commandendcase第24题:编制一个日历时钟表单界面如图例所示;具体要求如下:1.“日期”“星期”“时钟”标签上的文本能自动换行,自动调整大小,背景透明;2.文本框对齐方式为中间对齐;3.时钟每1秒种跳一次;参考答案:1.表单的标题属性Caption设置为“日历时钟表单”;2.文本框Text1、Text2、Text3的对齐方式属性为Alignment为“2—中间”;3.时钟控件Timer1的Interval属性为1000;4.时钟控件Timer1的Timer事件代码:Y=STRYEARDATE,4M=STRMONTHDATE,2D=STRDAYDATE,2C="日一二三四五六"N=DOWDATEW="星期"+SUBSTRC,2N-1,2+""+CDOWDATE+""第26题:编制一个如图所示的表单界面如图例所示;参考答案:1.表单的标题属性Caption设置为“学生成绩信息浏览”;2.表单的Form1的Init事件代码:set dele onSElect 课程set order to tag 课程号 in 成绩SET RELATION TO 课程号 INTO 成绩select 学生set order to tag 学号 in 成绩SET RELATION TO 学号 INTO 成绩with 成绩.readonly=.f..allowaddnew=.f..deletemark=.f.endwith"READONLY",.T.,"TEXTBOX"3. 表单的Form1的Unload事件代码:clear events4. 命令按钮组Commandgroup1的Click事件代码:do casecase =1 &&表头按钮go topcase =2 and bof &&前翻skip -1if bofendifcase =3 and eof &&后翻skipif eofendifcase =4 &&表尾go bottomcase =5 &&退出if messagebox"退出吗",4+32,"退出确认框"=6select 成绩packset delete offendifendcase第27题:编制一个表单完成学生成绩信息查询显示功能界面如图例所示;参考答案:1.表单的标题属性Caption设置为“学生成绩信息查询表单”;2.文本框Text1的SelectOnEntry设置为“.T.”;3.表单的Form1的Init事件代码:sele 学生set order to tag 学号 in 成绩set relation to 学号 into 成绩"visible",.f.4.表单的Form1的Unload事件代码:use5.文本框Text1的Valid事件代码:loca for alltrim学号=alltrimif found"visible",.t.else"visible",.f.messagebox'查无此人',0+48,"提示窗"endifreturn .t.6.文本框Text1的Gotfocus事件代码:"visible",.f.第28题:编制一个表单完成表文件“成绩.dbf”内容的查询显示功能界面如图例所示;参考答案:1.表单的标题属性Caption设置为“学生成绩信息查询”;2.表单的Form1的Init事件代码:sele 学生set order to tag 学号 in 成绩set relation to 学号 into 成绩3. 列表框List1的Interactivechange事件代码:"visible",.t.4. 列表框List1的Gotfocus事件代码:sele 学生set order to tag 学号 in 成绩set relation to 学号 into 成绩第30题:编制一个表单完成学籍信息查询显示功能界面如图例所示;参考答案:1.表单的标题属性Caption设置为“学生学籍信息查询表单”;2.表单的Form1的Init事件代码:SELE 成绩SET ORDER TO TAG 课程号 IN 课程SET RELATION TO 课程号 INTO 课程sele 学生set order to tag 学号 in 成绩set relation to 学号 into 成绩"visible",.f.。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

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事件代码:写法一:bel2.Caption=Thisform.Text1.Value写法二:X=Thisform.Text1.Valuebel2.Caption=X3〕“关闭〞的按钮Command2的Click事件代码:Thisform.Release〔二〕Command1 的CLICK事件代码:if thisform.text1.value="abc"bel2.caption="欢迎使用"elsebel2.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*rmessagebox(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)=0Thisform.Text2.Value=“这是一个偶数!〞ELSEThisform.Text2.Value=“这是一个奇数!〞ENDIF2〕“关闭〞的按钮Command2的Click事件代码: Thisform.Release 〔八〕代码编写:1〕“计算〞按钮Command1的Click事件代码:x=thisform.text1.valuethisform.text2.value=x^22〕“关闭〞的按钮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.valueIf mod(x,2)=0bel2.caption=“偶数“Elsebel2.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系统)。

相关文档
最新文档