百师联盟 2024届高三一轮复习联考(四)4 新高考卷技术答案
百师联盟 2024届高三一轮复习联考(四)4 新高考卷技术答案正在持续更新,目前2024届周测卷答案网为大家整理了相关试题及答案,供大家查缺补漏,高效提升成绩。
本文从以下几个角度介绍。
-
1、百师联盟2024新高考联考4
2、2024百师联盟高三一轮复习联考四
3、百师联盟2024高三一轮复习联考四
4、百师联盟2024高三冲刺卷四新高考
5、百师联盟高三一轮2024四
6、百师联盟2024高三第四次联考
15.某校新初一学生共288人,根据分班考成绩行分成6个班。规则如下:首先对全年级学生按女生在前、男生在后,根据分班考成绩降序排序,然后进行蛇形分班,如第15题图a所示:编写VB程序,实现上述行分班功能。运行程班级1班2班3班4班5班6班序,单击“读学生成绩”按钮Cmdl,从数据库文件中123456读取学生的编号、姓名、性别、分班考成绩,分别保女生121110987存在数组no、xm、xb、cj中,再单击“行分班”按成绩1314……钮Cmd2,在列表框List1中输出分班结果。程序运排名行界面如第15题图b所示。123456请回答下列问题:男生121110987(1)若要清空列表框List1,能实现该功能的语成绩1314句是(单选,填字母:排名A.List1.Caption =""/B.List1.Textw"/C.Listl.Clear)第15题图a(2)实现上述功能的VB程序如下,请在划线处填入合适的代码。(3)程序中加框处代码有错,请改正。Const num 288,class =6Dim no(1 To num)As Integer'编号n0分班结果:班级姓名性别成绩Dim xm(1 To num)As String’姓名Xm4579450Dim xb(1 To num)As String’性别xb441读学生成绩Dim cj(1 To num)As Single'分班考成绩cj5女女女女6Dim bj(1 To num)As Integer'分到班级bj65Dim w As Integer’女生人数w4342432Private Sub Cmd1 Click()432’从数据库文件中分别读取学生的编号、姓名、性别、分班考成绩,分别保存在2女女女女女女女女女女女行分班数组no、xm、xb、cj中422”统计女生人数保存在w中,代码略End Sub第15题图bPrivate Sub Cmd2_Click()Dim i As Integer,j As Integer,k As IntegerDim t As Integer,c As StringFor i 1 To num -1①For j=i To num -1’排序时,女生在前、男生在后降序排序,分班考成绩相同时不作特别处理Ifkb(k)="男”And xb(j)="女"Then k=jNext jIf k
本文标签: