2.在表单对象释放时引发____________事件,是表单对象释放时最后一个要引发的事件。
3.所谓运行表单就是根据表单文件用____________的内容产生表单对象。
4.修改表单文件T1.SCX的命令是____________
5.在属性窗口中,有些属性的默认值在列表框由以斜体显示,其含义是这些属性在设计时是____________的。
程序填空题
1.下列是判断一个自然数是否为质数(素数)的程序,请将程序填写完整
CLEAR
INPUT "请输入一个大于1的自然数:" TO N
K=0 &&K的值为0表示所输入的自然数是质数,为1表示不是质数
M=2
DO WHILE M<N
IF MOD(N,M)_____①______
______②_______
LOOP
ELSE
_______③______
EXIT
ENDIF
ENDDO
IF K=0
STR(N)+[是质数]
ELSE
STR(N)+[不是质数]
ENDIF
2.下面程序的功能是从键盘上输入20个数,找出其中最大数和最小数。请在程序中空缺处填上适当内容,使其完整正确。
CLEAR
INPUT "输入一个数:" TO MA
MI=MA
FOR N=1 TO 19
INPUT "输入一个数:" TO X
IF X>MA
MA=X
ELSE
_________①_________
_________②_________
_________③_________
ENDIF
ENDFOR
MA,MI
RETURN
3、说明DB,DBMS,DBS,DBA的含义和相互之间的联系。
5、简述计算机数据管理技术经历了哪几个由低级到高级的发展阶段。
答:三个阶段第一个 人工管理阶段
第二个 文件管理阶段
第三个 数据库系统管理阶段
5、分析下列程序,写出功能
USE spxx IN 1
SELECt 1
USE xsqk
USE
6、有如下程序:
INPUT“请输入一个数值型数据:” TO X
DO CASE
CASE X<0
Y=2*X-1
CASE X>=0
Y=7*X+2
ENDCASE
?Y
假定从键盘输入的X的值为3,分析这个程序的执行结果。
7、 有如下程序:
SET TALK OFF
INPUT "请输入一个数值型数据:" TO X
IF X=10
Y=30
ELSE
Y=20
ENDIF
Y=″20+30″
?Y
SET TALK ON
假定从键盘输入的X的值一定是数值型,请分析这个程序的执行结果。
二、填空(每空2分 共20分)
1、在VFP中,调用表设计器建立数据库表ST.DBF的命令是________________
2、教师表JS.DBF(字段:工号C(6),姓名C(8),基本工资 N(7,2),系名C(16))。
完成下列SQL命令,统计表中“信息管理系”职工的平均工资。SELECT________________ FROM JS _______________
3、记录的定位方式有________定位、____________定位和条件定位三种。
4、若要将表单中所有文本框的显示内容清空,则实现的句_________drop
______________________。
5、若表单在运行时以最大化方式运行,则应设置表单______________属性,其值为______________。
三、阅读程序题
现有一数据表DA.DBF,其记录内容如下:
记录号 姓名 性别 总分
1 王海英 女 450
2 吴用 男 560
3 张明英 女 650
4 李英 女 560
5 黄英宇 男 640
1、Set Talk Off
Select * From DA Where 姓名 Like “%英%” Into DBF DD
Use DD
P=1
Do While P<3
??姓名
P=P+1
skip
enddo
Use
Set Talk On
程序运行后,屏幕显示为:____________________________
2、USE DA
Min=0
SCAN
IF 性别=“男”and 总分 Min=总分
Endif
Endscan
USE
? Min
程序运行结果为:
3、 USE DA
INDEX ON 性别 TAG XM UNIQUE
LIST FIELDS 姓名 OFF
程序运行后,屏幕显示为:
四、程序填空
1、已知学生成绩表(CJ.DBF)的结构由(学号,C,6)、(课程代号,C,2)和(成绩,N,3)三个字段组成,下面程序段用来检查表中的成绩是否小于0,如果小于0,给出提示信息。例如:如果第3条记录的成绩小于0,则显示提示信息为:"第3条记录的成绩录入不合法"。完善下列程序段,使它完成上述功能:
USE CJ
SCAN
IF___________
n=RECNO()
S=messagebox("第"+ ________ +"条记录的成绩录入不合法")
ENDIF
_________
Use
2、已知有考生数据表tst.dbf有字段:考号C(8),姓名C(6),性别C(2),年龄 N(2),考场C(3)。其中考号的最后四位表示考生序号,除考场字段外,其余字段已录入了数据,下面的程序功能是把考生序号为1,9,17,25,…的考生编入405考场。
set talk off
use tst
do while not eof()
tstno=val(_____________________)
if ___________________
replace 考场 with ‘405’
endif
________
enddo
use
set talk off