高二下高教版可视化编程应用基础——Visual Basic 4.2.3 统计开奖号码和出现的次数 课件

任务4.2 读写Excel表中的数据 可视化编程应用基础-Visual Basic 4.2.3 统计开奖号码和出现的次数 本次课学习内容 复习以前所学： （1）与Excel交互(读写数据)的基本操作; （2）利用一维数组进行简单分类统计求和的操作方法 新知：二维数组定义及读写、选择法排序算法进行排序 关键点： 类比两个甚至多个一维数组高效操作 结合生活中的选择法排序思维 逐步求精 复习任务1 一维数组的定义 任务说明： 将下发的程序半成品复制到个人文件夹中并打开。增加按钮“统计”，用一维数组来进行读取E列（各位开奖号码之和）个数，并赋初值。填写数组的相关概念 数组是指 名字 下标的一组数据； 数组必须先定义后使用，默认下标从 开始。 定义64个元素的一维整型数组aHM： ； 标准完成时间：3分钟 复习任务2 一维数组的分类统计 分类统计 改进CommandTJ_Click()事件，判断如果单元格内容为空则读结束。利用aHM( i )=aHM( i )+1的形式进行统计求次数。注意运行时请保证原Excel文档关闭。 任务说明： 将文件夹中的“cp.xls”工作簿打开，指定工作表1为当前操作表。将E列出现的值次数存入一维数组aHM(0 To 63)中。 标准完成时间：6分钟 巩固任务 任务说明： 将以上步骤通过VB界面设计与属性设置，制作参照图所示的界面。 在cp.xls文件增加两列，G和H列名分别为“和”和“出现次数”。 标准完成时间：2分钟 任务1 应用二维数组改进分类统计 改进的分类统计求和 改进CommandTJ_Click()事件，使用二维数组，并采用aHM( i ,1)=aHM( i ,1)+1形式分类求和。 任务说明： 改一维数组为二维数组aHM(0 To 63,0 To 1)，第一维存放和，第二维存放该和出现的次数。统计和出现的次数到aHM第二维中。 标准完成时间：7分钟 任务2 按出现次数从高到低排序 选择法排序 完善CommandTJ_Click()事件，双重循环，每1轮先假设第i个位置数据为当前最大，依次与后面每个比较，找出最大数与第i个位置互换，同时互换对应和值。i取值0 To 62（本题63个减1个位置即可）。 任务说明： 将二维数组aHM按出现次数从高到低排序，要求利用选择法排序。 标准完成时间：12分钟 任务3 排序结果存入Excel对应列 对应列保存 二维的两个维度采用循环分别保存。 任务说明： 将二维数组的第一、二维内容分别存入Excel当前工作表的G列与H列中。 标准完成时间：5分钟 任务4 显示过程的信息交互 调用xsxx过程 每一段交互内容通过参数s调用。 任务说明： 补充调用xsxx过程，依次写入各事件需调用的位置，以实现各操作过程的实时控制。 标准完成时间：3分钟 小结 复习以前所学： （1）与Excel交互(读写数据)的基本操作; （2）利用一维数组进行简单分类统计求和的操作 新知：二维数组定义及读写、选择法排序算法进行排序 王文迪 文德香 翁浙斌 吴钱江 杨燕 今天卫生值勤 关闭门窗； 关闭空调；关灯。 检查各机位是否关机；键盘是否复位；凳子是否放好； 检查抽屉，桌面是否有垃圾，将垃圾倒入垃圾桶。 检查地面是否有垃圾，将垃圾倒入垃圾桶。 $