浙教版高中信息技术教学软件的设计思路与技术实现.ppt

教学软件的设计思路与技术实现 信息技术 信息技术教学软件的设计思路与技术实现 教学软件概述 教学软件是一种根据教学目标设计 表现特定的教学内容 反映一定教学策略的计算机教学程序 它可以用来存储 传递和处理教学信息 能让学生进行交互操作 并对学生的学习做出评价的教学媒体 多媒体教学软件的类型 1 课堂演示型2 自主学习型3 模拟实验型4 训练复习型5 教学游戏型6 资料 工具型 信息技术教学软件的设计思路与技术实现 软件规模及内容 规模 小而精内容 通用性 目前多媒体课件大多都是供教师上课时讲授用的 仍然是以教作为中心 而且普遍缺乏通用性 通用性是考察课件效率和效益的最重要的标准 许多人制作课件 出发点不是为整体的教学服务 只是为了偶然上公开课的需要 这样的课件从一开始就是为了某一节特定的课例而设计的 从一开始就决定了它不可能用在别的课上 更没有考虑用在别的老师的课上 课件的生命力短暂的 信息技术教学软件的设计思路与技术实现 总体结构 软件常见的体系结构模式有 c s结构 即client server 客户机 服务器 b s结构 即browser server 浏览器 服务器 信息技术教学软件的设计思路与技术实现 界面设计与文件结构 界面设计 按照上面的软件结构图设计好界面 界面风格如图所示 文件结构 设计好课程内容或试题 并建立好相应的目录 题目少可以用文件文件来存储 如果题目多可以用access数据库来存储 信息技术教学软件的设计思路与技术实现 抽题 抽题也就是根据学生的选择将软件目录下的题目复制到考试文件夹下 主要是对文件和文件夹进行复制 对文件和文件夹进行操作需要使用fso filesystemobject 对象模型 所以需要先引用microsoftscriptingruntime 能创建 改变 移动 删除文件 文件夹 能检测文件 文件夹是否存在 文件 文件夹的路径 能获取文件 文件夹的信息 如 名称 创建日期等 抽题 privatesubbutton1 click 复制excel试题文件fso copyfileapp path xxjshk excel 试卷一 xls c 考生文件夹 试卷一 xls true 复制网页试题文件夹fso copyfolderapp path xxjshk webdo c 考生文件夹 webdo trueendsub publicfsoasnewfilesystemobject 定义一个fso对象 在c盘下建立相应的考生文件夹privatesubform load fso createfolder c 考生文件夹 endsub privatesubbutton2 click 复制excel试题文件fso copyfileapp path xxjshk excel 试卷二 xls c 考生文件夹 试卷二 xls true 复制网页试题文件夹fso copyfolderapp path xxjshk webdo c 考生文件夹 webdo trueendsub privatesubbutton3 click 复制excel试题文件fso copyfileapp path xxjshk excel 试卷三 xls c 考生文件夹 试卷三 xls true 复制网页试题文件夹fso copyfolderapp path xxjshk webdo c 考生文件夹 webdo trueendsub 抽题 privatesubbutton1 click indexasinteger 按钮控件数组 复制excel试题文件fso copyfileapp path xxjshk excel ex index xls c 考生文件夹 ex index xls 复制网页试题文件夹fso copyfolderapp path xxjshk webdo c 考生文件夹 webdo endsub 对于功能相似的控件可以使用控件数组 以提高程序开发效率 也便于以后的源程序维护 publicex 5 asstring 定义一字符串数组用于存放试卷名ex 1 试卷一 ex 2 试卷二 ex 3 试卷三 ex 4 试卷四 ex 5 试卷五 继续答题 判断考生文件夹中试题是否存在 存在则不抽题 不存在则抽题 fso fileexists fso folderexists 重做 从考生文件夹中删除要重做的试题 然后再抽题 fso deletefile fso deletefolder 信息技术教学软件的设计思路与技术实现 抽题 选择题的抽取和显示 privatechoose asstringprivatefsoasnewfilesystemobject filasfile tsastextstreamprivatesubform load dimsasstringp app path xxjshk ex examid 1 txt setfil fso getfile p setts fil openastextstream forreading s ts readallchoose split s ts closeendsubprivatesubbtn ch click indexasinteger text1 text choose index endsub 信息技术教学软件的设计思路与技术实现 批改功能的实现 选择题windows操作题word操作题excel操作题internet操作题frontpage操作题 信息技术教学软件的设计思路与技术实现 选择题的批改 p app path xxjshk ex examid answer txt setfil fso getfile p setts fil openastextstream forreading s ts readall 读取正确答案fori 0to9ifmid s i 1 1 answer i then 核对学生答案score score 3endifnextts close 信息技术教学软件的设计思路与技术实现 windows操作题的批改 新建 删除 重命名 复制 移动 创建快捷方式 就是判断该文件或文件夹是否存在 判断文件夹是否存在 fso folderexists判断文件是否存在 fso fileexists例如 在 c 试卷二 目录下新建一个bmp的文件夹 iffso folderexists c 试卷二 bmp truethenscore score 5把 c 试卷一 目录下的a pas移动到c temp目录下 iffso fileexists c 试卷一 a pas falseand fso fileexists c temp a pas truethenscore score 5 信息技术教学软件的设计思路与技术实现 windows操作题的批改 vb读取注册表 可以使用api函数regopenkeyex regqueryvalueex regclosekey来对注册表进行打开 查询等操作 并通过读取相对应的键值来判断墙纸 屏保的设置 墙纸在注册表中的路径为 hkey current user controlpanel desktop wallpaper屏保在注册表中的路径为 hkey current user controlpanel desktop scrnsave exe 设置墙纸 屏保 主要就是读取注册表中相关的键值 信息技术教学软件的设计思路与技术实现 excel word操作题的批改 对于excel练习题的批改其实就是vb在后台打开excel工作表 并使用内置的vba函数对excel工作表中的对象进行判断 为了能在vb中调用excel对象 首先必须在vb工程中引用 microsoftexcel11 0objectlibrary 如果是word 则引用 microsoftword11 0objectlibrary 信息技术教学软件的设计思路与技术实现 excel操作题的批改 打开excel workbooks open c 练习1 xls 选择一张工作表 sheets sheet1 activate 单元格的表示 range 列号行号 例 range a1 区域的表示 range 列号行号 列号行号 例 range a1 d5 例如 判断sheet1工作表中的a1 d5单元格中的文字字体是否为宋体 选择一个单元格或区域 selectselection例 range a1 d5 select 关闭excel工作表 workbooks close ifsheets sheet1 range a1 d5 font name 宋体 thenscore score 5 sheets sheet1 activateifrange a1 d5 font name 宋体 thenscore score 5 sheets sheet1 activaterange a1 d5 selectifselection font name 宋体 thenscore score 5 信息技术教学软件的设计思路与技术实现 excel操作题的批改 excel中的对象以及它们的方法 属性都非常多 我们怎能都记住呢 例如 range a1 d1 mergecells true 合并range b2 g5 horizontalalignment xlcenter 对齐方式为水平居中range c3 font color rgb 255 0 0 文字为红色range d4 text 成绩表 单元格中的文本range e5 value 100 单元格中的数值range f6 font bold true 文字为粗体 了解了工作表 单元格 区域的表示方式后 我们就能写出excel中各种常见操作的批改程序了 视图 对象浏览器 excel库 查看excel对象的方法 属性 信息技术教学软件的设计思路与技术实现 excel操作题的批改 公式 函数 单元格公式 函数的表示 range 列行 formular1c1 公式 函数 单元格的另一种表示 cells 行 列 range b8 也可表示为 cells 8 2 排序 例 将成绩表按语文成绩从高到低排序 dimflagasbooleanflag truefori 3to6ifval cells i 2 text val cells i 1 2 text thenflag falseexitforendifnextifflag truethenscore score 5 信息技术教学软件的设计思路与技术实现 excel操作题的批改 数据筛选 对数据筛选的判断 从表格数据的第2列中筛选出小于70的数据 ifworksheets sheet1 autofiltermodethenifworksheets sheet1 autofilter filters 2 onthenwithworksheets sheet1 autofilter filters 2 if criteria1 70 thenscore score 5endwithendifendif 小技巧 利用excel里的宏来帮助我们写批改程序 信息技术教学软件的设计思路与技术实现 ie操作题的批改 下载图片 文字 文件 方法与windows操作题中文件操作的判断类似 也就是判断这些图片 文本等文件在该目录下是否存在 为使批改更加精确 也为了防止学生在做题时投机取巧 可以在此基础上再判断该图片的大小和文本文件里的文字内容 从而判断出这些图片和文本文件是否来自该网页 信息技术教学软件的设计思路与技术实现 ie操作题的批改 设置ie主页 历史记录天数 通过读取注册表里键值来判断 方法和屏保 墙纸的判断类似 例 判断ie主页是否是 就是判断hkey current user software microsoft internetexplorer main startpage的键值是否是 信息技术教学软件的设计思路与技术实现 frontpage操作题的批改 原理 网页其实就是文本文件 只不过里面的内容都是用html标记来显示的 学生对网页的操作都会反映在html源文件里 所以要批改网页文件 只要像读取文本文件那样读取整个网页源文件 然后分析里面的html代码就可以了 读取html文件 读取文件既可以用传统的i o语句也可以用fso对象模型来读取 publicfsoasnewfilesystemobject filasfile tsastextstreamp c 考生文件夹 webdo index htm setfil fso getfile p setts fil openastextstream forreading fpstr ts readallts close 信息技术教学软件的设计思路与技术实现 frontpage操作题的批改 定位 instr函数 例如 判断表格边框粗细是否为0 seekstr border 0 n1 instr 1 fpstr table 1 n2 instr 1 fpstr tr 1 fp1 mid fpstr n1 n2 n1 ifinstr 1 fp1 seekstr 1 thenscore score 5 原形 instr start string1 string2 compare 参数说明 start 搜索的起点 如果省略 将从第一个字符的位置开始 string1 接受搜索的字符串表达式 string2 被搜索的字符串表达式 compare 指定字符串比较 1 使用optioncompare语句设置执行一个比较 0 执行一个二进制比较 1 执行一个按照原文的比较 2 仅适用于microsoftaccess 执行一个基于数据库中信息的比较 信息技术教学软件的设计思路与技术实现 frontpage操作题的批改 逐步求精法 通过分析网页源文件 逐步定位并读取该操作所对应的部分html代码 因为网页源文件里有很多 1 fp3 mid fpstr n n2 n1 5 seekstr1 img seekstr2 src hu jpg ifinstr 1 fp3 seekstr1 1 andinstr 1 fp3 seekstr2 1 thenscore score 5 例如 判断是否在表格的第3行第1列的单元格里插入图片hu jpg 信息技术教学软件的设计思路与技术实现 frontpage操作题的批改 注释法 因为在网页源文件里添加注释不会对网页产生任何影响 所以我们可以在需要定位的html代码前后加上一段注释 然后通过读取注释来定位 html中的注释符为 如前面的例子 判断是否在表格的第3行第1列的单元格里插入图片hu jpg 首先可以在第3行第1列的单元格所对应的html代码前后随便加上一些注释 假设分别加上和 n1 instr 1 fpstr 1 n2 instr 1 fpstr 1 fp3 mid fpstr n1 n2 n1 fpstr1 img fpstr2 src hu jpg ifinstr 1 fp3 fpstr1 1 andinstr 1 fp3 fpstr2 1 thenscore score 5 信息技术教学软件的设计思路与技术实现 成绩上传功能的实现 winsock是windows提供的网络编程接口 它提供了基于tcp ip 传输控制协议 网间协议 协议的接口实现方法 tcp ip协议提供两种通信方式 tcp方式和udp方式 tcp是一种面向连接的服务 它在两个主机之间建立连接 提供双向 有序且无重复的数据流服务 以及流量控制 差错检测和纠错等服务 保证数据的可靠传输 udp是一种双向的无连接数据服务 它把数据发送出去但并不进行差错控制和检查 所以不能保证数据的可靠性 因而一般只用于少量数据的传输 采用哪种方式 通常可以考虑以下几点 在收发数据过程中是否需要对方确认或应答 数据是否很多 数据传输质量要求是否很高 数据发送是间歇的还是一次会话 信息技术教学软件的设计思路与技术实现 成绩上传功能的实现 在窗体上添加一个winsock控件 winsock1 在其属性中设置为udp协议 并对winsock1的本地端口 远程主机端口 远程主机ip地址进行初始化 tcp ip协议中一个有效的网络地址包括ip地址和端口地址 信息技术教学软件的设计思路与技术实现 成绩上传功能的实现 onerrorgotoerrsendtxt winsock1 localip winsock1 localhostname username userscorewinsock1 senddatasendtxtmsgbox 成绩上传成功 exitsuberr msgbox 找不到服务器 请确定服务器ip无误 vbokonly 错误 privatesubbtnsendscore click endsub 点击按钮btnsendscore后执行发送成绩功能 代码如下 改进 每一道题的详细得分情况 信息技术教学软件的设计思路与技术实现 教师机收卷程序的实现 在vb中新建一工程 并设计好用来显示学生成绩的界面 添加一个winsock控件