河北高考专科计算机学校分数线,河北职业学校计算机高考升学分数线.doc

河北职业学校计算机高考升学分数线

下文是关于河北职业学校计算机高考升学分数线相关内容，希望对你有一定的帮助：

河北职业学校计算机高考升学分数线【一】:河北省对口升学计算机专业各年高考表单试题

1. 在Visual FoxPro的表单上添加一个标签，其Name属性为：Label1，添加一个命令按钮，其Name属性为：Command1，Caption属性为：显示。 Command1的Click事件代码如下： =“*” For k=1 TO 2

= +Str(k,3) EndFor For n=1 TO 3

FOR i=1 TO n

= +Str(i*n,3) EndFor EndFor

运行上面的表单，单击命令按钮，则标签上显示的结果为(要求按格式写输出结果，空格用└┛表示)：

2．设有数据库文件“学生管理.dbc”，该库中有“学生”表和“成绩”表，表结构如下： “学生”表：学号(C,8)，姓名(C,8)，性别(C,2)，平均分(N,5,1) “成绩”表：学号(C,8)，课程名(C,20)，成绩(N,5,1) 设计应用程序界面如下：

设置控件属性如下：

文本框的Name属性为：Text1(Text1用于输出平均分最高的课程的课程名和平均分。)

编写Visual FoxPro程序实现下述功能：

(1)根据“成绩”表计算每个学生的“平均分”，并将结果存入“学生”表的“平均分”字

段。

(2)根据上面的统计结果，生成一个新的自由表SC_AVG，该表的字段按顺序取自“学生”

表的“学号”、“姓名”、“平均分”，并按“平均分”升序排列。

(3)根据“成绩”表计算每门课程的平均分，并在文本框中显示平均分最高课程的“课程名”

和“平均分”(假设平均分最高的只有一门课程)。

程序如下，请将程序填写完整。(代码中行末的分号为逻辑行连接符) Command1的Click事件 SET TALK OFF SET SAFETY OFF DIMENSION PJ(1,1) OPEN DATABASE 学生管理 USE 学生

DO WHILE NOT EOF()

SELECT AVG(成绩) FROM 成绩 WHERE 学号=学生.学号　　 PJ REPLACE 平均分 WITH PJ(1,1)　　 ENDDO

SELECT 学号,姓名,平均分 FROM 学生 ORDER BY 平均分 INTO TABLE SC_AVG SELECT 课程名 AS 课程名,AVG(成绩) AS 平均分 FROM 成绩 GROUP BY 课程名; INTO TABLE MYNEW

SELECT MAX(平均分) AS MAX_平均分 FROM MYNEW INTO TABLE MAX_AVGA USE MAX_AVGA MAX_A=MAX_平均分

SELECT 课程名 AS 课程名,平均分 AS 最高分 FROM MYNEW WHERE 平均分=MAX_A; INTO TABLE MAX_AVGB USE MAX_AVGB

=课程名+ STR(最高分,6) CLOSE ALL

1．在Visual FoxPro的表单上添加一个标签，其Name属性为：Lba，Caption属性为：请输入字符串，添加一个文本框，其Name属性为：txt，添加一个标签，其Name属性为：Lbb，Caption属性为：空，添加一个命令按钮，其Name属性为：Command1，Caption属性为：确定。 Command1的Click事件代码如下：

mystr= mystr=Trim(mystr) n=LEN(mystr) DIME arr(n) FOR i=1 TO n

arr(i)=SUBSTR(mystr,i,1) ENDFOR m=3 j=0

FOR i=n TO 1 STEP -1　　IF arr(i)=[*]　　 j=j+1　　ELSE　　 EXIT　　ENDIF ENDFOR b=[ ] c=[ ] s=0 IF j>m　　 s=m ELSE s=j ENDIF

FOR i=1 TO n-s

IF (arr(i)>=[0] and arr(i)0

IF INT(X/2)=X/2　　 S1=S1+1　　ELSE

S2=S2+1　　ENDIF

IF MOD(X,3)=0　　 S3=S3+1　　ENDIF　　X=X-1 ENDDO

=S1 =S2 =S3

=S1+S2+S3

运行上表单时,在TEXT1中输入10,单击”计算”按钮后,TEXT2、TEXT3、TEXT4、TEXT5中显示结果依次为__________________