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

河北职业学校计算机高考升学分数线 　　下文是关于河北职业学校计算机高考升学分数线相关内容，希望对你有一定的帮助： 　　河北职业学校计算机高考升学分数线【一】:河北省对口升学计算机专业各年高考表单试题 　　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 jm　　 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中显示结果依次为____________________