计算机应用 | 古代文学 | 市场营销 | 生命科学 | 交通物流 | 财务管理 | 历史学 | 毕业 | 哲学 | 政治 | 财税 | 经济 | 金融 | 审计 | 法学 | 护理学 | 国际经济与贸易
计算机软件 | 新闻传播 | 电子商务 | 土木工程 | 临床医学 | 旅游管理 | 建筑学 | 文学 | 化学 | 数学 | 物理 | 地理 | 理工 | 生命 | 文化 | 企业管理 | 电子信息工程
计算机网络 | 语言文学 | 信息安全 | 工程力学 | 工商管理 | 经济管理 | 计算机 | 机电 | 材料 | 医学 | 药学 | 会计 | 硕士 | 法律 | MBA
现当代文学 | 英美文学 | 通讯工程 | 网络工程 | 行政管理 | 公共管理 | 自动化 | 艺术 | 音乐 | 舞蹈 | 美术 | 本科 | 教育 | 英语 |

CAI教学软件中数据的分割毕业论文

2015-08-31 01:43
导读:计算机论文论文,CAI教学软件中数据的分割毕业论文论文样本,在线游览或下载,科教论文网海量论文供你参考:摘要: 本文使用面向对象的高级语言Visual Basic6.0设计了一套既能编辑,又能

摘要: 本文使用面向对象的高级语言Visual Basic6.0设计了一套既能编辑,又能应用于教学演示的高级CAI软件。使用本软件,用指定的格式输入CAI数据,并在其中设置断点;同时,用本软件进行播放,可实现模拟教学目的。本文着重论述了如何输入数据、分割数据和显示数据的算法。

Abstract:Using the advanced language Object Oriented -Visual Basic 6.0, the author developed a set of advanced CAI software, which can be used in data editing and teaching. This software can be used to input CAI data in assigned format and set breakpoints. At the mean time, it can be used to display data in order to realize the objective of simulated teaching. This article emphasizes on the algorithm of data input, data split and data display.

随着计算机的普及和网络技术的发展,计算机辅助教学(CAI)越来越受到人们的重视。但纵观目前流行的CAI软件,大多只能进行简单的放映,而不具备编辑能力,为数很少的几个能够编辑的软件,操作又很复杂,不能针对教学特点。基于此,作者设计了一个既能编辑,又能放映的CAI软件,该软件高度集成,易学易用。
1 数据的输入
数据的输入采用了类似超文本语言的方法,规定了若干关键字。如:“\”表示一个特定的指令的开始;又如:“\titl^2、光的性质^”,titl:表示后边的内容是一条标题,位于“^……^”之间的数据为标题的内容,“^”为范围限定符。
所有的符号都可以在编辑状态下的屏幕上找到。如图一是编辑状态的一角,左边 图 1 编辑状态
为文字区,右边为指令区。 Fig.1 edit status 2 数据的分割
数据的分割分为两个步骤进行:
第一步:把文章以字形为根据分解成段落。字形的标识与命令标识相关。
程序如下:
'把整个一页分成若个段落
Public Sub FunDivide(ByRef SourceStr As String, ByRef Destination As String, ByRef Position As Integer, ByRef propName As String)

(科教论文网 lw.nseaC.Com编辑发布)

Dim ControllCode As String
Dim codCommand As String
1
Dim ss As String
Dim SourceLen As Long

SourceLen = Len(SourceStr)
Destination = ""

ControllCode = Mid(SourceStr, Position, 1)
If (ControllCode = "\") Then
Position = Position 1
codCommand = Mid(SourceStr, Position, 4)
propName = codCommand
Position = Position 4
codCommand = Mid(SourceStr, Position, 1)
If codCommand = "^" Then
Position = Position 1
ss = Mid(SourceStr, Position, 1)
Do While ss
    上一篇:论地方文献报刊信息数据库及主题标引工作 下一篇:没有了