最新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,z2
for i=1 to y
a=substr(x,i,1)
do case
case asc(a)>=65 and asc(a)<=90
z1=z1+1
case asc(a)>=97 and asc(a)<=122
z2=z2+1
endcase
endfor
thisform.text2.value=z1
thisform.text3.value=z2
（1）执行该程序后，“统计1”右边的文本框Text2和“统计2”右边的文本框Text3中的数据值分别为5、22
（2）Text2和Text3的初值分别为0、0
2、有数据表“图书.DBF”包含书号、书名、出版社、作者等字
段，设计如图1所示表单，表单运行后，单击命令按钮可以在
表格控件中显示图书表的部分字段的数据，如图1所示，请选
择并完善代码。
命令按钮的CLICK事件代码：
USE 图书
copy TO TS FIELDS 书号,书名
THISFORM.GRID1.RECORDSOURCETYPE=0
THISFORM.GRID1.RECORDSOURCE=”TS”
表单的UNLOAD（释放对象时发生）事件：
CLOSE ALL
DROP TABLE TS
3、考生数据表（文件名为：KS.DBF）中有“准考证号/C/9”、
“密码/C/6”、“成绩/N/5/1”等字段。设计如图2所示表单，
将考生数据表添加到表单的数据环境中，表单运行后，在表单
的文本框TEXT1中输入查询考生的准考证号，文本框TEXT2
中输入该考生的查询密码后，单击“查询”按钮，查询该考生
的成绩，并将该考生的成绩显示在表单的标签LABEL3中（考
号或密码输入错误，则弹出提示窗口显示“准考证号或密码错
误！”）。请选择并完善代码。
“查询”按钮的CLICK事件代码如下：
SELECT KS
KH=ALLTRIM(THISFORM.TEXT1.V ALUE)
MM=ALLTRIM(THISFORM.TEXT2.V ALUE)
Locate for 准考证号=KH and密码=MM
IF FOUND()
THISFORM..lebel3.caption=str(成绩，5，1)
ELSE
MESSAGEBOX(“准考证号或密码错误！”)
ENDIF
4、设计如图3所示表单，表单运行后，要在表格中显示图书表中数量
最少的3种图书信息，请选择并完善代码。
表单FORM1的INIT事件代码如下：
THISFORM.GRID1.RECORDSOURCETYPE=4
THISFORM.GRID1.RECORDSOURCE=”SELECT top 3* ROM 图
书;
Order by数量INTO CURSOR TEMP”
5、有学生成绩表（文件名：XSCJ.DBF），表中数据如下所示，设计如
图5所示表单，将学生成绩表添加到表单数据环境中，表单运行时，单击“统计”命令按钮，LABEL1显示课程名为计算机基础且成绩在80以上的平均成绩，LABEL2显示这些记录的绩点总和
姓名课程名成绩绩点
陈兵计算机基础92 4
杨昆计算机基础68 1
江三计算机基础88 3
陈兵程序设计80 3
杨杨电子商务70 2
杨杨计算机基础90 4
图5
（1）程序填空：“统计”命令按钮的CLICK事件代码如下：
SC=0
SD=0
N=0
DO WHILE .NOT. EOF()
IF 课程名=”计算机基础” AND 成绩>80
SC=SC+成绩
SD=SD+绩点
N=N+1
ENDIF
SKIP
ENDDO
https://www.360docs.net/doc/c318246227.html,BEL1. C APTION=STR(SC/N)
https://www.360docs.net/doc/c318246227.html,BEL2.CAPTION=STR(SD)
（2）写结果：两个标签（LABEL1，LABEL2）中分别显示的结果是90 和11
6、选择题。设计如图6所示表单，命令按钮组COMMANDGROUP1的BUTTONCOUNT属性值设置为3。其余属性均为默认值。表单运行后，鼠标单击COMMAND2后表单中控件的变化情况，请选择（B）
在COMMANDGROUP1的CLICK事件中有如下代码：
CASE THIS.V ALUE=1
THISFORM.EDIT1.V ALUE=”VFP 简单、易学” https://www.360docs.net/doc/c318246227.html,MAND1.CAPTION=”隶书” CASE THIS.V ALUE=2
THISFORM.EDIT1.V ALUE=”编程思维很重要” https://www.360docs.net/doc/c318246227.html,MAND2.CAPTION=”楷体” CASE THIS.V ALUE=3
THISFORM.EDIT1.V ALUE=”多看例题多思考” https://www.360docs.net/doc/c318246227.html,MAND3.CAPTION=”宋体”
ENDCASE 图6 A 编辑框中显示：VFP 简单、易学；第1个命令按钮上面的文本显示为：隶书 B 编辑框中显示：编程思维很重要；第2个命令按钮上面的文本显示为：楷体 C 编辑框中显示：多看例题多思考；第3个命令按钮上面的文本显示为：宋体 D 没有变化
7、有两个表文件，表中数据如下所示：
学生成绩表（文件名为：SC.DBF ） 学生信息表（文件名为：XS.DBF ） 学号 课程 成绩 学分 1001 英语 92 4 1003 英语 78 4 1005 程序设计 95 3 1007 程序设计 82 3 1001 计算机基础 92 2 1003
计算机基础
88
2
设计如图7所示表单，表单运行后，单击“查询”命令按钮，表格GRID1中显示的结果是（B ）
SELECT 姓名,课程,成绩 FROM XS,SC WHERE XS.学号=SC.学号 AND 成绩>90 AND 学分>=3 ORDER BY 成绩 DESC INTO CURSOR LB
THISFORM.GRID1.RECORDSOURCE=”LB ”
A 陈颖 程序设计 95
B 陈颖 程序设计 95 王伟 计算机基础 92 王伟 英语 92
C 王伟 计算机基础 92
D 王伟 英语 92 王伟 英语 92 陈颖 程序设计 95
8、设计如图8所示表单，运行表单后，单击“command1”按钮，标签LABEL1显示的内容为（） 命令按钮“command1”的CLICK 事件代码如下： K=.T. Y=10 X=””
DO WHILE K Y=Y+1
IF Y/5=INT(Y/5) X=X+STR(Y ,3) ELSE
LOOP 图8
学号 姓名 性别 1001 王伟 男 1003 张灿 女 1005 陈颖 女 1007
王城
男
IF Y>20 K=.F. ENDIF ENDDO
https://www.360docs.net/doc/c318246227.html,BEL1.CAPTION=X 执行结果为（ D ） A 10 15 B 10 15 20 C 15 20 D 15 20 25
9、设计如图9所示表单，表单运行时单击“显示”按钮，在列表框LIST1控件中将显示（ ） “显示”按钮的click 事件代码： DIME A(4) B=”A ” A=””
FOR I=1 TO 3
A(I)=SPACE(10-I) FOR J=1 TO 2*I-1 A(I)=A(I)+B
B=CHR(ASC(B)+1) ENDFOR
THISFORM.LIST1.ADDITEM(A(I))
ENDFOR 结果： A
BCD EFGHI
10、设计如图10所示表单，运行表单后，在两个文本框TEXT1、TEXT2中分别输入“中秋”、“节日”，单击“command1”按钮，标签label2中会显示（A ） Command1的click 事件代码：
X=ALLT(THISFORM.TEXT1.V ALUE) Y=ALLT(THISFORM.TEXT2.V ALUE) SUB1( )
https://www.360docs.net/doc/c318246227.html,BEL2.CAPTION=X+Y RETURN
自定义方法程序SUB1：
LOCAL X X=”快乐” Y=”月圆” X=X+Y
RETURN A 中秋月圆 B 中秋快乐 C 节日快乐 D 快乐月圆 二、程序设计题
设有两个数据表：导师表（文件名为：DSB.DBF ）（导师编号/C ，姓名/C ，性别/C ，研究方向/C ）；学生表（文件
名为：XSB.DBF ）（学号/C ，姓名/C ，性别/C ，所在院系/C ，导师编号/C ）。
设计如图11所示表单，组合框COMBO1与导师表中的导师编号字段绑定。表单运行后，在组合框COMBO1中选择任一位导师的编号，则
（1）在标签LABEL3处显示该导师的姓名；
图9 图10
图11
（2）在标签LABEL5处显示该导师的研究方向；
（3）在表格GRID1控件中显示该导师所指导的学生信息（包括学号、学生姓名、性别、所在院系）。
请编写组合框COMBO1的INTERACTIVECHANGE事件代码实现以上查询功能。
答案：
将表单的数据环境设为导师表
COMBO1的INTERACTIVECHANGE事件代码：
Locate for导师编号=this.value
https://www.360docs.net/doc/c318246227.html,bel3.caption=姓名
https://www.360docs.net/doc/c318246227.html,bel5.caption=研究方向
Thisform.grid1.recordsourcetype=4
Thisform.grid1.recordsource=’select学号,姓名, 性别,所在院系from学生表where导师编号=thisform.value’ 言语理
解与表达
A
1 [哀怜爱怜爱恋] 三者读音大致相同，但意义和用法不同。”哀怜”指对别人的不幸遭遇表示同情，如”中华民族有哀怜弱者的传统”。”爱怜”指十分疼爱，多用于子女，如”爱怜子女”。”爱恋”指热爱而难以分离，多用于男女之间，如”二十多年来，他俩一直相互爱恋着”。
2 [爱护爱惜] 爱护有精心保护，不使受到损坏或镀害的意思;爱惜指不浪费，不糟蹋。前者既可指人，又可指物;后者则仅指物或抽象事物，如”时间”。
3 [安闲安适] 安闲重在”闲”——心中无所牵挂;安适重在”适”——舒适，惬意。
4 [安置安顿安排] “安置”重在于”置”，使工作、生活、物品等有适当的位置，或指人或物的处置各得其所，又指安置亲属、行李、灾民等;”安顿”着重在于”顿”，妥当安排使有着落。”安排”着重于”排”，分轻重缓急，先后主次，有条不紊地处置人或事物，多指人事、任务等的处理。
5 [按语暗语] 相同点：二者都与语言有关。不同点：”按语”也写作”案语”，指作者、编者对有关文章、词句所做的说明、提示或考证。如”这个文段，编者特地加了按语”;”暗语”指彼此约定的秘密话，如”这些话纯是暗语，别人根本听不懂”。
6 [暗淡黯淡] 二者都指不明朗。不同的是：”暗淡”指光色昏暗，不光明，不鲜艳，如”光线暗淡”;”黯淡”①指心理暗淡，如”心情黯淡”;②同”暗淡”。
7 [翱翔遨游] 二者都与游动有关，但游动的方式有所不同。”翱翔”指在空中回旋地飞。”遨游”指漫游，游历。如”自由翱翔”，”遨游太空”。
8 [懊悔懊恼] 懊悔重在”悔”——后悔，更多的是”责己”;懊恼重在”恼”——烦恼，更多的是”怨天尤人”。
B
9 [把持操纵] 把持是独占、独揽的意思，往往是公开性的活动;操纵是支配、控制的意思，多是幕后行为。
10 [颁布颁发]”颁布”侧重于公布，对象往往是法令、条例等;”颁发”侧重于授予、发出，对象常是奖品或命令、指示等。
11 [包括包罗包含包涵] “包括”可指具体事物，又可指抽象事物，如意识形态，包括政治、法律、道德等思想观点。”包罗”指广大范围，众多事物，常说包罗万象。”包含”对象多是抽象事物，如：这句话包含好几层意思。”包涵”请人原谅，如：请多包涵。
12 [包藏饱藏] “包藏”指包含，隐藏，如”包藏祸心”。”饱藏”指深深地隐藏着，如”他那双贼圆的眸子里饱藏着杀机”。
13 [包含饱含包涵] 三者都有含有的意思，但含有的浓度或对象不同。”包含”仅指里边含有，如”这句话包含好几层意思”。”饱含”指所含的量特别充足，如”饱含着深厚的阶级感情”。”包涵”指客套话，请人原谅，如”唱得不好，请大家多多包涵”。
14 [保障保证] “保障”指有效地保护人民财产、劳动、科研成果等使人不受侵犯和破坏;”保证”着重于用事实或行动担保做到。
15 [报复抱负包袱] “报复”指对批评自己或损害自己利益的人进行反击，贬义，如”他善于对提意见的人打击报复”。”抱负”指远大的志向，褒义，如”青年人应该有理想，有抱负”。”包袱”比喻影响思想或行动的负担，如”思想包袱”。
16 [报到报道] “报到”，动词，指向组织报告自己已经来到，如”新生入学报到处”。”报道”也写作”报导”，名词，指新闻稿，如”他写了一篇新闻报道”;动词，通过媒体把新闻告诉群众，如”报道消息”。
17 [暴戾暴力] “暴戾”，形容词，指粗暴乖张，残酷凶恶，如”这个老板真是暴戾，动辄对工人进行打骂”。”暴力”，名词，
①强制的力量，武力，如”暴力革命”;②特指国家的强制力，如”军队对于敌对阶级是一种暴力”。
18 [暴病抱病] 二者都与疾病有关，但词性和词义不同。”暴病”指突然发作来势很凶的病，名词，如”一场暴病，整得他意志完全消沉了”。”抱病”指有病在身，动词，如”自此以后，他一直抱病在家，不再露面”。
19 [爆发暴发] “爆发”，①指岩浆突然冲破地壳，向外进出，如”火山爆发”;②指通过外部冲突而发生的质变，如”爆发革命”;③指力量、情绪等忽然发作，或事变突然发生，如”会场里爆发出雷鸣般的掌声”。”暴发”，①指突然发作，如”山洪暴发”;
②指突然发财得势，多含贬义，如”暴发户”。
20 [奔赴奔向] “奔赴”侧重于”将要走到，跑到，赶到”;”奔向”侧重于”朝某个方向”奔，没有”赶到”之意。
21 [本领本事] “本领”着重于工作的技能，特殊的技巧，”本事”着重于活动的能力，指一般的能力，如：他有本事。
22 [本质实质] “本质”运用范围比”实质”广，”本质”指人或事物本身所固有的根本的属性，它可构成本质特点等词组，”实质”指内在的实际属性，跟表面的或虚假的东西相对，一般指抽象事物，如：精神实质。
23 [崩裂迸裂] 二者都是动词，都有裂开的意思。”崩裂”指物体猛然分裂成若干部分，如”山石崩裂”。”进裂”指破裂，裂开而往外飞溅，如”脑浆进裂”。
24 [必须必需] 必须，副词，侧重于”应当怎样”;必需，动词，侧重于”不可或缺”。
25 [变易变异] 二者都与变化有关，但所指的对象不同。”变易”指改变，变化，如”这里的情况并无多大变易”。”变异”指同性生物世代之间或同代生物不同个体之间在形态特征、生理特征等方面所表现出来的差异，如”物种变异”。
26 [变换变幻] 二者都是动词，都有变化之意。”变换”指事物的一定形式或内容换成另一种，多指具体的事物，如”变换一下位置”。”变幻”指不规则地改变，多指抽象事物，如”世界上的政治风云变幻莫测”。
27 [辨别鉴别] “辨别”侧重于把事物区分开;”鉴别”侧重于审定真伪或好坏。
28 [辩白辩护辩解] “辩白”重在于”白”，说明白事实，一般指在被误会或被指责的情况下进行分辩，使真相大白;”辩护”着重于”护”，用充足的理由为自己或他人申辩;”辩解”着重于”解”，分辩解释，说明见解或言行是正确的或错误不是那么严重。
29 [报怨抱怨]二者都与”怨”有关。不同点是：”报怨”指报复怨恨，如”这次恶性事件是由肇事者报怨引起的”;”抱怨”指心中不满，数说别人不对，或埋怨，如”这都应怪自己，不能抱怨别人”。
30 [辩别辨别] “辩别”指用言辞来分别，如”辩论会上，他从理论上仔细辩别了这件事的是非曲直”。”辨别”指根据不同事物的特点，在认识上加以区别，如”