VFP程序设计基础-表单设计练习
VFP程序设计基础-数据库及表操作练习
1.数据库表的字段可以定义默认值,默认值是()。
•A、逻辑表达式•B、字符表达式•C、数值表达式•D、前三种都可能参考答案: D2.若所建立索引的字段值不允许重复,并且一个表中只能创建一个,它应该是()。
•A、主索引•B、惟一索引•C、候选索引•D、普通索引参考答案: A3.在下面的数据类型中默认值为.F.的是()。
•A、数值型•B、字符型•C、逻辑型•D、日期型参考答案: C4.如果指定参照完整性的删除规则为“级联”,则当删除父表中的记录时()。
•A、系统自动备份父表中被删除记录到一个新表中•B、若子表中有相关记录,则禁止删除父表中记录•C、会自动删除子表中所有相关记录•D、不作参照完整性检查,删除父表中的记录与子表无关参考答案: C5.在Visual FoxPro中,建立索引的作用之一是()。
•A、节省存储空间•B、便于管理•C、提高查询速度•D、提高查询和更新的速度参考答案: C6.执行命令"INDEX on 姓名TAG index_name "建立索引后,下列叙述错误的是()。
•A、此命令建立的索引是当前有效索引•B、此命令所建立的索引将保存在.idx文件中•C、表中记录按索引表达式升序排序•D、此命令的索引表达式是"姓名",索引名是"index_name"参考答案: B7.在Visual FoxPro中,存储图象的字段类型应该是()。
•A、备注型•B、通用型•C、字符型•D、双精度型参考答案: B8.对数据表建立性别(C,2)和年龄(N,2)的复合索引时,正确的索引关键字表达式为•A、性别+年龄•B、VAL(性别)+年龄•C、性别,年龄•D、性别+STR(年龄,2)参考答案: D9.数据库表可以设置字段有效性规则,字段有效性规则属于域完整性范畴,其中的"规则"描述不对是。
•A、逻辑表达式•B、字符表达式•C、数值表达式•D、日期表达式参考答案: B、C、D10.在VFP中,索引类型包括以下哪几种类型?•A、主索引•B、候选索引•C、普通索引•D、惟一索引参考答案: A、B、C、D。
vfp表单和控件练习题
v f p表单和控件练习题(共13页) --本页仅作为文档封面,使用时请直接删除即可----内页可以根据需求调整合适字体及大小--VFP表单和控件练习题1. 单选题:(分)在下列VFP的基类中,无CAPTION属性的基类是_________A. 标签B. 文本框C. 选项按钮D. 复选框解答:B参考答案: B2. 单选题:(分)将某个控件绑定到一个字段,移动记录后字段的值发生变化,这时该控件的_______属性的值也随之变化。
A. ValueB. NameC. CaptionD. 没有解答:A参考答案: A3. 单选题:(分)用户在VFP中创建子类或表单时,不能新建的是______________.A. 属性B. 方法C. 事件D. 事件的方法代码解答:C参考答案: C4. 单选题:(分)如果要引用一个控制所在的直接容器对象,则可以使用下列_____属性。
A. THISB. THISFORMC. PARENTD. 都可以解答:C参考答案: C5. 单选题:(分)命令按钮中显示的文字内容,是在属性_______中设置的。
A. NameB. CaptionC. FontNameD. ControlSource解答:B参考答案: B6. 单选题:(分)当用鼠标使组合框的内容发生变化时,将首先触发_______事件。
A. InteractiveChangeB. ClickC. InitD. DownClick解答:A参考答案: A7. 单选题:(分)若要建一个有5个按钮的选项组,应将属性_____的值改为5。
A. OptiongroupB. ButtoncountC. BoundColumnD. ControlSource解答:B参考答案: B8. 单选题:(分)VFP系统环境下,运行表单的命令为_______。
A. DO FORM <表单名>B. REPORT FORM <表单名>C. DO <表单名>D. 只能在项目管理器中运行解答:A参考答案: A9. 单选题:(分)建立事件循环的命令为______ 。
vf表单试题
vf表单试题职业部07-08学年下学期第⼀次⽉考试卷科⽬:《VFP》⼀、填空题(每空1分,共30分)1.表单向导能产⽣两种表单:__________和________________________。
2.表单的英⽂名称为____________;表单设计完成以后,保存在磁盘上的表单⽂件的扩展名为________________。
3.创建快速表单的步骤:(1)_____________________________________(2)通过________菜单的_______________命令进⾏设置。
4.Visual FoxPor6.0中的控件对象基于所属的类可以分为________________和________________。
5._______控件是⼀种能在表单上显⽰⽂本的输出控件,常⽤作提⽰或说明。
6.标签的__________属性⽤于指定该标签的标题。
7.可以向⽂本框输⼊数值型、____________、____________、逻辑型4种类型,⽽编辑框只能⽤于输⼊和编辑____________型的数据。
8.Active X绑定控件与_____________型的字段绑定,能显⽰此类型中的OLE对象。
9.数据环境指创建表单时使⽤的数据源,包括_______、____________以及表单所要求的表之间的关系。
10.数据环境设计器中拖动表的字段到表单中产⽣的控件,如果添加的是逻辑型字段系统⽣成_____________;备注型字段⽣成____________;表⽣成_____________。
11.在表单设计器中,如果选定多个对象需按住____________键然后单击各个对象。
12.在表单设计器中复制对象时,新对象可以复制原对象的所有信息,但不能复制原对象的____________属性。
13.在命令窗⼝中执⾏___________________或_____________________命令,即可打开表单设计器窗⼝。
vfp表单设计
1.编制“学生”表信息查询界面,要求如图1、图2、图3所示。
图1 用户选择前的运行界面图2 用户选择同学后的运行界面图3 控件的布局界面2.编制一个表单完成表文件“学生.dbf”内容的学生奖学金查询显示功能(界面如图所示)。
要求:①当用户在组合框输入或选择班级(学号的左三位)后,按回车或“确定”按钮时,表单将自动显示对应班级的奖学金总额;②按“退出”按钮时,自动关闭表单。
图:用户选择确定后的运行界面3.建立一个表单,通过控件的事件代码控制,实现表单顶行的标签信息向下平移。
设计界面如图所示:图:信息单向平移表单设计界面4.运用文本框和计时器对象设计一个数字时钟表单,界面如图1、2所示。
要求:文本框文字为隶书、20号字,表单的标题为“数字时钟”,每隔1秒钟刷新一次时间。
图1:设计界面 图2:运行界面5.设计一个圆球跳动表单。
要求:球的宽和高为40,球的填充颜色为咖啡色,表单的标题为“圆球跳动”,球每隔0.5秒在表单的上下边之间跳动。
按开始按钮球跳动,按停止按钮球停止。
设计界面和运行界面见下图所示。
6.设计一个完成口令判定功能的表单,界面如图所示。
具体要求如下:①用户从键盘输入口令时,表单的显示控件以“*”代替具体内容;②系统的口令存放在表文件“学生.dbf ”的姓名字段中,要求完全匹配;③输入口令后,按回车或按“确定”按钮,将自动显示信息框(Messagebox ),提示“正确!”或“错误!”;④按“退出”按钮将自动关闭表单。
7. 编制一个表单完成表文件“学生.dbf ”内容的自动只读浏览显示功能,界面如图所示。
具体要求如下:①表单初始显示内容为表文件“学生.dbf ”的首记录;②表单内容将以10秒为间隔自动刷新,即自动顺序向后翻记录,当翻至表底时,将自动回到首记录循环翻动。
8.编制一个显示时钟和日期的表单,界面如图所示。
命令按钮及文本框的字体、颜色和大小设置为自己喜欢的形式。
图:设计界面 图:时间显示界面图:日期显示界面9.借助于文本框和微调框编制一个手工日历表单,界面如图所示。
最新vfp多表表单程序设计例题
综合表单设计(多表操作)【练习1】创建一个查询指定学生成绩的表单。
要求:(1)在text1文本框中输入学生的学号后,如果学生存在,则显示该生的成绩信息,否则显示学生不存在的提示信息;(2)使用数据环境实现成绩.dbf和学生.dbf之间的临时关联。
方法一:FORM1.INITTHIS.SETALL("V ALUE"," ","TEXTBOX")THIS.TEXT2.READONL Y=.T.MAND1.DEFAULT=.T.WITH THIS.GRID1.READONL Y=.T..ALLOWADDNEW=.F..DELETEMARK=.F..RECORDSOURCETYPE=1.RECORDSOURCE="成绩".VISIBLE=.F.ENDWITHTHIS.TEXT1.SETFOCUSSELE 成绩INDEX ON 学号TO XHSELE 学生SET RELA TO 学号INTO 成绩TEXT1.VALIDSELECT 学生SNO=ALLTRIM(THISFORM.TEXT1.V ALUE)LOCATE FOR 学号=SNOIF FOUND()THISFORM.GRID1.VISIBLE=.T.THISFORM.TEXT2.V ALUE=姓名ELSEMESSAGEBOX("查无此人!",0+48,"提示窗")THISFORM.GRID1.VISIBLE=.F.ENDIFTHISFORM.TEXT1.SELECTONENTRY=.T.THISFORM.TEXT1.SETFOCUSTHISFORM.REFRESH方法二:FORM1.INITTHIS.SETALL("V ALUE"," ","TEXTBOX")THIS.TEXT2.READONL Y=.T.MAND1.DEFAULT=.T.WITH THIS.GRID1.READONL Y=.T..ALLOWADDNEW=.F..DELETEMARK=.F..RECORDSOURCETYPE=1.RECORDSOURCE="成绩"ENDWITHTHIS.TEXT1.SETFOCUSTEXT1.VALIDSELECT 学生SNO=ALLTRIM(THISFORM.TEXT1.V ALUE)LOCATE FOR 学号=SNOIF FOUND()THISFORM.TEXT2.V ALUE=姓名SELECT * FROM 成绩WHERE 学号=学生.学号INTO CURSOR XSCJTHISFORM.GRID1.RECORDSOURCE="XSCJ"ELSEMESSAGEBOX("查无此人!",0+48,"提示窗")ENDIFTHISFORM.TEXT1.SELECTONENTRY=.T.THISFORM.TEXT1.SETFOCUSTHISFORM.REFRESH【练习2】创建一个查询指定课程的选修情况的表单,组合框combo1的数据源为课程名,表格grid1的数据源为成绩.dbf,标签2、标签3、标签4 的标题为“”。
计算机二级VFP重点复习资料表单练习题
数字化程序及表单设计1.(prog1.prg,form1.scx)已知圆半径,求圆面积。
2.(prog5.prg,form5.scx)输入一个整数,并判断其奇偶性。
3.(prog9.prg,form9.scx)求N!文本框text1,text2的初值为0(即value属性值为0)方法1:方法2:4.(prog2.prg,form2.scx)已知三角形三边,求三角形的面积。
S=SQRT(L*(L-A)*(L-B)*(L-C)) ,其中L=(A+B+C)/2文本框text1,text2,text3的初值为0命令按钮“三角形面积=”的click事件代码:三边能够构成三角形的条件,即任意两边之和大于第三边执行该命令,弹出如下提示框:5(prog3.prg,form3.scx)判断某一年是否是闰年。
文本框text1的初值为默认值命令按钮“判断闰年”的click事件代码:6.(prog4.prg,form4.scx)判断月份值的春夏秋冬。
文本框text1的初值为日期型,右键单击文本框,选择生成器设置。
命令按钮“判断季节”的click事件代码:7.(prog6.prg,form6.scx)输入成绩,判断等级。
文本框text1的初值为0命令按钮“输出等级”的click事件代码:8.(prog7.prg,form7.scx)输入任意两个数,比较大小,输出较大数或较小数。
文本框text1,text2,text3的初值为0文本框text3的Gotfocus事件代码:方法1:方法2:方法3:9.(prog8.prg,form8.scx)S=1+2+……+n 文本框text1,text2的初值为0文本框text2的Gotfocus事件代码:判断一个数是自然数的条件,大于0并且是一个整数10.(prog10.prg,form10.scx)100以内能够被X整除的数之和。
文本框text1,text2的初值为0文本框text2的Gotfocus事件代码:11.(prog11.prg,form11.scx)自然数的平方和。
VFP表单练习
图2VFP 表单练习一、修改表单FORMDTEST 项目中已经存在表单FORMD ,该表单用来进行系统登录。
已知A 盘根目录下存在表文件USER ,该表用来存放登录用户的编号(no )、姓名(name )、职务(title )和口令(password )。
另一张表LOGIN 用来存放登录的年(year )和月(month )根据下列要求对表单进行修改,完成以后运行表单,效果如图2所示。
1. 将表单的标题设置为“系统登录”。
2. 设置表单有关属性,使表单运行时不可最小化。
3. 使口令文本框中输入的字符以“*”号显示。
4. 为“确定”按钮设置有关属性,使得当表单运行并按 ENTER 键时,无论当前焦点在哪个对象上,“确定”按钮总能得到焦点并自动执行它的Click 事件代码。
5. “年月”下拉列表框的RowSouceType 为“3-SQL 语句”,设置它的RowSource 属性,使得该下拉列表框中显示LOGIN 表中的年月两个字段的数据。
且显示格式为 ××××年××月(如图2所示)。
6. 假如USER 表中姓名(name )字段的值不重复,且已经按姓名建立了一个普通索引name ,索引表达式为name ,完善姓名下拉列表框的InterActiveChange 事件,使得当选择不同的用户姓名时,“职务”文本框中显示其相应的职务(title)字段的值。
答案:1. 表单的Caption 属性为“系统登录” (1)2. 表单的MinButton 属性值为.F. (1)3. 口令文本框的PasswordChar 值为* (1)4. “确定”按钮的Default 属性为.T. (1)5. SELECT year+'年'+Right('0'+ALLT(month),2)+'月' FROM login INTO CURS cYmtmp(2)6. SEEK lsname ORDER name IN USER (2)THISFORM.TXT_TITLE.V ALUE = USER.TITLE (2)TEST项目中已经存在表单FORMA,Array该表单可以完成类似于Windows中的记事本功能。
(完整版)vfP程序设计基础习题集
VFP程序设计习题习题一一、判断题(1分/题,共20分,对打画√,错打×)1.建立自由表分两步:定义表结构和输入数据。
2.表间的关系分三种:一对一关系、一对多关系和多对多关系。
3.若要使用多个表,就要使用多个工作区。
4.在应用程序中可以通过使用该工作区的表的别名来标识工作区。
5.对象具有属性,而属性只能在设计阶段设置。
6.引用对象的方法分绝对引用和相对引用。
7.表单集是指两个以上的表单同时输出,并且可以通过程序或鼠标交换输出权。
8.一条命令可分几行写,在行结束处用“:”表示一行未完,转入下一行。
9.VFP主要数据容器有:表记录、变量和数组。
10.报表包括两个基本组成部分:数据源和布局。
11.如果不想使用“报表向导”或“快速报表”设计报表,可以从空白报表布局开始,然后自己添加控件。
12.表选择查询输出的去向可以是浏览、报表或表单。
13.视图与查询相类似的地方是:可以用来从一个或多个相关联的表中提取有用信息。
14:视图与表相类似的地方是:可以用来更新其中的信息,并将更新结果永久保存在磁盘上。
15.在“数据库设计器”中,视图的显示方式与表在分层结构中的显示方式相同,所不同的是视图名代替了表名。
16.一个视图在使用时,将作为临时表在自己的工作区中打开。
17.如果打开基于本地表的视图,则在Visual FoxPro的另一个工作区中基表被同时打开。
18.在视图中更新数据与在表中更新数据类似,使用视图还可以对其基表进行更新。
19.VFP中的NULL表示未知数据,便于与含有NULL值的SQL数据库一起工作。
20.索引是改变表的物理顺序,排序是排列表的逻辑顺序。
二、选择题(每个选择3分,共24分)1.统计女生人数并将结果存放于变量X中的命令是()(A).COUNT FOR .NOT. 性别=”男” TO X(B).COUNT FOR ( 性别=”女”)=.T. TO X(C).SUM FOR ( 性别<>”男”)=.T. TO X(D).SUM FOR 性别=”女” TO X2. 在已打开的表中,要永久删除当前记录位置开始的10条记录,可用()(A)先执行DELETE NEXT 10命令,后用PACK命令(B)先执行DELETE RECORD 10命令,后用PACK命令(C)先执行DELETE FOR RECORD> 10命令,后用PACK命令(D)ZAP NEXT 103.按数值型字段”总分”进行索引,使其按降序排列的命令是()(A)INDEX ON -总分TO WP(B)INDEX ON 总分/A TO WP(C)INDEX ON 总分TO WP(D)INDEX ON 总分/D TO WP4.下列操作后,不改变表记录指针的命令是()(A)RECALL(B)LIST(C)SUM(D)REPL ALL5.按照数据库的数据模型分类,VFP属于()(A)层次型(B)关系型(C)网状型(D)混合型6.函数LEN(SPACE(5)-SPACE(1))的返回值是()(A)错误信息(B)17(C)6(D)47.某表文件中有日期型字段”出生日期”,设N=’01/01/80’,下列命令正确的是()(A)LOCATE FOR 出生日期=’01/01/80’(B)LOCATE FOR 出生日期=&N(C)LOCATE FOR DTOC(出生日期)=N(D)LOCATE FOR DTOC(出生日期)=CTOD(N)8.从表customer中提取所有记录生成查询,并将查询结果存放于表MyCursor的SQL命令为()(A)SELECT * FROM customerINTO CURSOR MyCursor(B)SELECT * FROM customerINTO TABLE MyCursor(C)SELECT ALL FROM customerINTO TABLE MyCursor(D)CREATE SQL VIEWMyCursor ASSELECT * FROM customer答案一.1.(√)2.(√)3.(√)4.(√)5.(×)6.(√)7.(√)8.(×)9.(√)10.(√)11.(√)12.(×)13.(√)14.(√)15.(√)16.(√)17.(√)18.(√)19.(√)20.(×)二.AAAABCCB习题二一.判断题(1分/题,共21分,对画√,错画×)1.VFP程序每行必须以“;”结尾。
vfp练习题
vfp练习题VFP练习题Visual FoxPro(VFP)是一种用于开发数据库应用程序的编程语言和集成开发环境(IDE)。
它具有强大的数据处理和界面设计功能,被广泛应用于企业级软件开发。
为了提高自己在VFP方面的技能,我们可以通过练习题来加深对VFP的理解和应用。
练习题一:数据表操作1. 创建一个名为"Students"的数据表,包含字段"ID"(整数类型)、"Name"(字符类型)和"Age"(整数类型)。
2. 向"Students"表中插入几条记录,包括不同的ID、姓名和年龄。
3. 编写VFP代码,查询"Students"表中年龄大于等于18岁的学生记录。
4. 编写VFP代码,根据学生的ID更新"Students"表中的姓名。
练习题二:界面设计1. 创建一个窗体,包含一个文本框和一个按钮。
2. 当用户在文本框中输入学生的姓名并点击按钮时,编写VFP代码,在"Students"表中查询并显示该学生的信息。
练习题三:报表生成1. 创建一个报表,显示"Students"表中所有学生的信息。
2. 在报表中添加一个计算字段,计算学生的年龄是否大于等于18岁,并显示"是"或"否"。
3. 在报表中添加一个汇总字段,计算学生的平均年龄。
练习题四:数据分析1. 创建一个名为"Scores"的数据表,包含字段"StudentID"(整数类型)和"Score"(整数类型)。
2. 向"Scores"表中插入几条记录,包括不同的学生ID和分数。
3. 编写VFP代码,查询"Scores"表中每个学生的平均分数,并将结果显示在一个报表中。
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.。
Visual FoxPro表单设计及答案
四、VF窗体设计共2题(共计45分)第1题(15.0分)题号:8如样张所示设计一个名为Form1的表单,表单上有三个标签(Label1、Label2、Label3),标题分别为“选课系统”、“图书管理系统”、“成绩查询系统”,当用鼠标单击任何一个标签时,其他两个标签的标题文本互换。
Label1:t=bel2.caption bel2.caption=bel3 .captionbel3.caption=tlabel2:t=bel1.caption bel1.caption=bel3 .captionbel3.caption=tlabel3:t=bel1.caption bel1.caption=bel2 .captionbel2.caption=t第2题(15.0分)题号:32如样张所示设计一个名为Form1的表单,包含一个文本框控件text1和两个按钮command1和command2,按钮的标题分别是“加一操作”和“减一操作”,文本框初始值为0,当单击一次“加一操作”按钮时,文本框中的数值加1。
当单击一次“减一操作”按钮时,文本框中的数值减1。
*Text1:过程 Initthis.value=0*加一操作x=thisform.text1.valuethisform.text1.value=x+1*减一操作x=thisform.text1.valuethisform.text1.value=x-1第3题(15.0分)题号:16如样张所示设计一个名为Form1的表单,有三个标签(Label1、Label2、Label3),分别为金额、存期、到期本息和。
三个文本框(Text1、Text2、Text3)要求根据用户输入的存款额和存期(月),单击“计算”按钮(Command1),显示到期后应得的本息和。
当存期小于12时,利息为1.8‰;当存期大于等于12小于24时,利息为2.5‰;当存期大于等于24小于36时,利息为2.8‰;当存期大于等于36时,利息为3.2‰,计算结果保留两位小数。
vfp表单设计应用练习题及答案
VFP6.0第7xx表单设计与应用及答案一、填空题: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.数据库中各个表的清单C.数据库查询的列表B.一个表中各个记录的清单D.窗口界面6、表单对象中可以包括的控件是( D )。
A.任意控件B.所有容器对象C.页框或任意控件D.页框、任意控件、容器或自定义对象7、在VisualFoxPro6.0中,标签控件默认的名字是(B)。
vf程序设计练习及答案
程序设计操作练习题计算:T=1!+2!+3!+…+10!。
T=0for i=1 to 10S=1for j=1 to iS=S*jendforT=T+Sendfor?"1!+2!+....10!=",T1.某商场的日销售表RQ.DBF包含:营业员代号(DH,N,6)、品名(PM,C,6)、数量(SL,N,2)、单价(DJ,C,7,2)、营业额(YEE,N,9,2),每一笔销售构成数据表中的一条记录,营业额字段为0,编程查询某个营业员全天营业额的程序。
例如:DH PM SL DJ YYE011201 洗衣机 4 1820.00011201 电饭锅8 298.00020301 空调 5 4500.00011201 空调 3 4500.00020301 MP3 1458.00CLEAUSE RQREPL ALL YYE WITH SL*DJ &&营业额=单价*数量D="" && 初始化变量DAccept "请输入营业员代号:" TO DS=0Locate for DH=DDo while Not eof()S=S+YYEContEnddo@12,10 SAY "营业额为:"+STR(S,8,2)RETU3. 逐条显示RSGL.DBF中的记录,显示完一条记录后暂停,出现提示“继续吗(Y/N)?”,用户输入Y(y)则继续显示下一条记录,输入N(n)退出。
clearset talk offuse rsgldo while .not. eof()disp 编号,姓名,性别,职称&&可以使用?输出wait "继续吗(Y/N)?" to YNif UPPER(YN)="N"ExitEndifSkipEnddoUseSet talk onReturn4显示RSGL.DBF中在1966年以后出生的职工记录。
vfp6.0表单典型例题
1、标签等控件的移动:控件从左边进右边出,单向移动。
编写程序:2、标签等控件的移动:控件从右边进左边出,单向移动。
编写程序:3、标签等控件的移动:控件从上边进下边出,单向移动编写程序:4、标签等控件的移动:控件从下边进上边出,单向移动编写程序:5、标签等控件的移动:控件从左边开始向右边移动,到达右边框时向左移动,往返移动。
编写程序:6、标签等控件的移动:控件从右边开始向左边移动,到达左边框时向右移动,往返移动。
编写程序:7、标签等控件的移动:控件从下边开始向上边移动,到达顶部边框时向下移动,往返移动。
编写程序:8、标签等控件的移动:控件从上边开始向下边移动,到达底部边框时向上移动,往返移动。
编写程序:9、 相关知识点:(仔细研究下面图中的每一个对象属性)1、 如果增加某控件的left 值,可以使该控件从当前位置向右移动,减小left 值,则可以使该对象从当前位置向左移动例如:BEL1.LEFT= BEL1.LEFT+10 (控件则向右移动)BEL1.LEFT= BEL1.LEFT-10(控件则向左移动)同意道理如果增加某控件的top 值则可以使该控件从当前位置向下移动,减小top 值可以使其从当前位置向上移动。
如:BEL1.top= BEL1.top+10(控件则从当前位置向下移动)BEL1.top= BEL1.top-10 LeftTop表单宽度width表单高度height对象宽度width 表单高度 height(控件则从当前位置向上移动)2、表单的宽度width和高度height可以用来控制循环,决定移动的控件移动到什么位置来向反方向移动或者重新开始移动。
3、决定控件移动的方向的往往需要一个变量来决定,如表单时使n=1表示向左移动,当n的值为0时表示向右移动。
当移动到最左边是要改变n的值为0,当移动到最右边时要改变n的值为1使控件向左移动。
VFP表单例题
VFP例题例一(史P195)设计只含一个文本框控件的表单,要求逐次单击框的内部能轮流显示当前日期与时间,试写出设计步骤。
(1)创建表单(2)创建文本框(3)将表单的Caption属性改为“日期与时间”(4)表单L oad事件代码的设置:PUBLIC I(5)文本框的Click事件代码编写:IF I=.T.THISFORM.TEXT1.V ALUE=DATE()THISFORM.TEXT1.DATEFORMAT=12THISFORM.TEXT1.DATEMARK="."I=.F.ELSETHISFORM.TEXT1.V ALUE=TIME()I=.T.ENDIF例二(史练习P67)[ 解 ] 设计步骤如下 :(1) 创建表单 : 往命令窗口键人命令MODIFY FORM T6-6, 使显示 T6-6.SCX设计器窗口 ( 参阅图 6.8) 。
(2) 创建文本框 : 单击表单控件工具栏中的文本框按钮 , 随后单击 Form1 表单窗口内某处 , 该处就会产生一个Text1 文本框控件。
(3) 创建命令按钮 , 并设置其 Caption 属性 : 单击表单控件工具栏中的 " 命令按钮 " 按钮 , 随后单击表单窗口内文本框控件下方 , 使产生一个 Command1 命令按钮控件→在属性列表框中选定 Caption 属性→在属性设置文本框中输入“日期或时间”字样。
(4) 修改表单的 Caption 属性 : 单击表单窗口 , 使属性窗口的对象组合框中显示Form1 →在属性列表框中选定Caption 属性→在属性设置文本框中输入“日期或时间”字样(5)Command1 的 MouseDown 事件代码编写如下 :图6.8LPARAb4ETERS nButton,nShift,nXCoord,nYCoord THISFORM.Text1.Value=DATEO && 本表单的文本框的值设置为当前日期THISFORM.Text1.DateFormatz12 && 日期格式设置为年月日次序THISFORM.Text1.DateMark="." && 年月日间隔符设置为点号(6)Commandl 的 MouseUp 事件代码编写如下 : LPARAMETERS nButton,nShift,nXCoord,nYCoord THISFORM.Text1.Value=TIMEO && 本表单的文本框的值设置为当前时间例 11章标签:表单中有三个标签 ,当用鼠标单击任何一个标签时 , 都使其他两个标签的标题文本互换。
vfp6.0表单设计程序填空
表单设计1.设计如下图所示的表单,表单运行时,在文本框中输入字符,单击“红色”按钮,文本框中的文本变成红色;单击“蓝色”按钮,文本框中的文本变成蓝色;单击“还原”按钮,将文本框中的文本颜色还原成输入时的颜色。
以下为该表单设计的相关代码,有多处空,请补充完整:●form的init事件代码为:public x●设计文本框text1的LostFocus事件代码为:x = this.●编写命令按钮组commandgroup1的click事件代码为:do casecase this.value=1thisform.text1.forecolor= rgb(255,0,0)case this.value=2thisform.text1.forecolor=case this.value=3thisform.text1.forecolor=endcasethisform.refresh●“退出”按钮的click事件代码为:THISFORM.2.根据成绩表(考号,笔试,上机)设计如下所示的表单,在文本框text1中输入考号后,单击“确定”按钮在表中按文本框中输入的考号进行查询。
如果找到了就显示,并在标签label1上显示相关的信息(如果该同学上机和笔试都在60分以上,显示“祝贺你,考试通过了!”;如果该同学笔试和上机有不及格的则显示“很遗憾,你××几科不及格,请继续努力!”),如果未找到就在label1上显示“该考号不存在,请重新输入考号!”,并将焦点设置到文本框上。
表单数据环境和相关对象属性设置已完成,相关代码设计如下,有多处空,请补充完整:●为了使得表单运行时,标签label1上不显示任何信息,应将标签label1的init代码设置为:THISFORM. =””●“确定”按钮的click事件代码为:locate for 考号= ALLTRIM( )if found()n=0str1=""if 笔试<60n=n+1str1=str1+"笔试"endifif 上机<60n=n+1str1=str1+"上机"endifif n=bel1.caption="祝贺你,考试通过了!"elsebel1.caption="很遗憾,你"+ STR1+STR(N,1) +"科不及格,请继续努力"endifelsebel1.caption="该考号不存在,请重新输入考号!"endifthisform.refresh* 3.以下是一通话计费的表单:表单运行时,表单的标题为“通话计费”;单击text1,在text1显示通话开始的时间;单击text2,在text2中显示通话结束时间;单击text3,在text3中显示通话时间,通话时间单位为分钟;单击text4,在text4中显示通话的费用,每分钟按3角进行计算,费用的单位为元,小数点后保留两位。
VF 表单程序题(含答案)
1、利用文本框和标签控件设计了一表单F1.SCX,文本框Text1的V alid事件代码及表单界面如图1所示。
向Text1中输入一段字符:”Figure 1-18 shows you how to use a MENU.”(不含双引号)[Text1.Valid event]x=alltrim(thisform.text1.value)y=len(x)store 0 to z1,z2for i=1 to ya=substr(x,i,1)do casecase asc(a)>=65 and asc(a)<=90z1=z1+1case asc(a)>=97 and asc(a)<=122z2=z2+1endcaseendforthisform.text2.value=z1thisform.text3.value=z2(1)执行该程序后,“统计1”右边的文本框Text2和“统计2”右边的文本框Text3中的数据值分别为5、22(2)Text2和Text3的初值分别为0、02、有数据表“图书.DBF”包含书号、书名、出版社、作者等字段,设计如图1所示表单,表单运行后,单击命令按钮可以在表格控件中显示图书表的部分字段的数据,如图1所示,请选择并完善代码。
命令按钮的CLICK事件代码:USE 图书copy TO TS FIELDS 书号,书名THISFORM.GRID1.RECORDSOURCETYPE=0THISFORM.GRID1.RECORDSOURCE=”TS”表单的UNLOAD(释放对象时发生)事件:CLOSE ALLDROP TABLE TS3、考生数据表(文件名为:KS.DBF)中有“准考证号/C/9”、“密码/C/6”、“成绩/N/5/1”等字段。
设计如图2所示表单,将考生数据表添加到表单的数据环境中,表单运行后,在表单的文本框TEXT1中输入查询考生的准考证号,文本框TEXT2中输入该考生的查询密码后,单击“查询”按钮,查询该考生的成绩,并将该考生的成绩显示在表单的标签LABEL3中(考号或密码输入错误,则弹出提示窗口显示“准考证号或密码错误!”)。
vfp表单所有习题参考标准答案
vfp表单所有习题参考答案————————————————————————————————作者:————————————————————————————————日期: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、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
1.扩展名为SCX的文件是( )。
•A、备注文件
•B、项目文件
•C、表单文件
•D、菜单文件
参考答案: C
2.在当前表单的LABEL1控件中显示系统时间的语句是()。
•A、BEL1.CAPTION=TIME()
•B、BEL1.VALUE=TIME()
•C、BEL1.TEXT=TIME()
•D、BEL1.CONTROL=TIME()
参考答案: A
3.以下叙述与表单数据环境有关,其中正确的是()。
•A、当表单运行时,数据环境中的表处于只读状态,只能
显示不能修改
•B、当表单关闭时,不能自动关闭数据环境中的表
•C、当表单运行时,自动打开数据环境中的表
•D、当表单运行时,与数据环境中的表无关
参考答案: C
4.在Visual FoxPro中,运行表单T1.SCX的命令是()。
•A、DO T1
•B、RUN FORM1 T1
•C、DO FORM T1
•D、DO FROM T1
参考答案: C
5.假定一个表单里有一个文本框Text1和一个命令按钮组Comman dGroup1,命令按钮组是一个容器对象,其中包含Command1 和Command2两个命令按钮。
如果要在Command1命令按钮的某个方法中访问文本框的value属性值,下面哪个式子是正确的?()。
•A、ThisForm.Text1.value
•B、This.Parent.value
•C、Parent.Text1.value
•D、this.Parent.Text1.value
参考答案: A
6.假设表单上有一选项组:●男○女,如果选择第二个按钮“女”,则该项组Value属性的值为________。
•A、.F.
•B、女
•C、 2
•D、女或2
参考答案: D
7.关闭当前表单的程序代码是ThisForm.Release,其中的Release 是表单对象的()。
•A、标题
•B、属性
•C、事件
•D、方法
参考答案: D
8.指定用户能否在列表框控件内进行多重选定的列表框属性是()
•A、Value属性
•B、ControlSource
•C、Selected
•D、MultiSelect
参考答案: D
9.假设表单My Form隐藏着,让该表单在屏幕上显示的命令是____ ____。
•A、MyForm. List
•B、 MyForm. Display
•C、MyForm. Show
•D、 MyForm. ShowForm
参考答案: C
10.在当前表单的命令按钮CMD1的CLICK事件代码中,将表单中的标签LABEL1的标题修改为“计算机考试”的命令是
•A、This.Caption="计算机考试"
•B、bel1.Caption="计算机考试"
•C、This.Parent.Caption="计算机考试"
•D、Thisform.Cmd1.Caption="计算机考试"
参考答案: B。