内容发布更新时间 : 2024/5/20 7:16:49星期一 下面是文章的全部内容请认真阅读。

精心整理

“读取数据库”按钮command1，程序从数据库读取数据；单击“开始统计”按钮command2，程序进行统计处理，结果输出在列表框list1中。程序运行界面如下图所示。

数组元素 数组元素的含义 a(1) 存储班级数n a(2) 从a(2)到a(n+1)依次存储第1、2、…第n个班级人数 … a(n+1) a(n+2) 从a(n+2)依次存储第1班每个学生的单科成绩、第2班… 每个学生的单科成绩、…第n… 班每个学生的单科成绩 实现上述功能的VB程序如下，请回答下列问题： （1）根据程序运行界面中的数据及数组a各元素的含义，数组元素a(5)的值为（填写数值）。 （2）分析程序，可知数据库的文件名为 （3）请在划线处填入合适的代码。 Dima(1to600)asinteger‘数组大小满足处理要求 Privatesubcommand1_click() ‘本过程由小王完成，从数据库读取指定科目的各相关数据，存储在数组a中 DimconnAsNewADODB.Conncction DimrsAsNewADODB.Recordset ConnConncctionString=””+”Score.accdb” Conn.Open Setrs.ActiveConnection=conn ‘本过程的其他语句略 Endsub Privatesubcommand2_click() ‘依据数组a中的相关数据统计各班级平均分 DimiAsInteger,jAsInteger,nAsInteger DimpAsInteger,sumAsInteger,averAsSingle ? p=n+2 Fori=1Ton sum=0

Forj=1Toa(i+1) ? p=p+1 Nextj

aver=sum/a(i+1)

list1.additemstr(i)+\

精心整理

nexti Endsub