亚洲国产日韩欧美在线a乱码,国产精品路线1路线2路线,亚洲视频一区,精品国产自,www狠狠,国产情侣激情在线视频免费看,亚洲成年网站在线观看

CAI教學(xué)軟件中數(shù)據(jù)的分割

時(shí)間:2024-09-13 23:17:21 計(jì)算機(jī)畢業(yè)論文 我要投稿
  • 相關(guān)推薦

CAI教學(xué)軟件中數(shù)據(jù)的分割

摘要: 本文使用面向?qū)ο蟮母呒?jí)語(yǔ)言Visual Basic6.0設(shè)計(jì)了一套既能編輯,又能應(yīng)用于教學(xué)演示的高級(jí)CAI軟件。使用本軟件,用指定的格式輸入CAI數(shù)據(jù),并在其中設(shè)置斷點(diǎn);同時(shí),用本軟件進(jìn)行播放,可實(shí)現(xiàn)模擬教學(xué)目的。本文著重論述了如何輸入數(shù)據(jù)、分割數(shù)據(jù)和顯示數(shù)據(jù)的算法。

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.

隨著計(jì)算機(jī)的普及和網(wǎng)絡(luò)技術(shù)的發(fā)展,計(jì)算機(jī)輔助教學(xué)(CAI)越來(lái)越受到人們的重視。但縱觀目前流行的CAI軟件,大多只能進(jìn)行簡(jiǎn)單的放映,而不具備編輯能力,為數(shù)很少的幾個(gè)能夠編輯的軟件,操作又很復(fù)雜,不能針對(duì)教學(xué)特點(diǎn);诖,作者設(shè)計(jì)了一個(gè)既能編輯,又能放映的CAI軟件,該軟件高度集成,易學(xué)易用。
1 數(shù)據(jù)的輸入
數(shù)據(jù)的輸入采用了類似超文本語(yǔ)言的方法,規(guī)定了若干關(guān)鍵字。如:“\”表示一個(gè)特定的指令的開(kāi)始;又如:“\titl^2、光的性質(zhì)^”,titl:表示后邊的內(nèi)容是一條標(biāo)題,位于“^……^”之間的數(shù)據(jù)為標(biāo)題的內(nèi)容,“^”為范圍限定符。
所有的符號(hào)都可以在編輯狀態(tài)下的屏幕上找到。如圖一是編輯狀態(tài)的一角,左邊 圖 1 編輯狀態(tài)
為文字區(qū),右邊為指令區(qū)。 Fig.1 edit status 2 數(shù)據(jù)的分割
數(shù)據(jù)的分割分為兩個(gè)步驟進(jìn)行:
第一步:把文章以字形為根據(jù)分解成段落。字形的標(biāo)識(shí)與命令標(biāo)識(shí)相關(guān)。
程序如下:
'把整個(gè)一頁(yè)分成若個(gè)段落
Public Sub FunDivide(ByRef SourceStr As String, ByRef Destination As String, ByRef Position As Integer, ByRef propName As String)
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

【CAI教學(xué)軟件中數(shù)據(jù)的分割】相關(guān)文章:

CAI技術(shù)在美術(shù)教學(xué)中的應(yīng)用的論文10-26

CAI課件在英語(yǔ)教學(xué)中的妙用06-26

access數(shù)據(jù)庫(kù)軟件在稅收審計(jì)中的運(yùn)用07-26

淺議CAI中電場(chǎng)變化的模擬描述10-16

演示型CAI在中學(xué)物理教學(xué)中的應(yīng)用研究09-20

淺談CAI對(duì)物理教學(xué)的影響07-20

CAI課件在臨床醫(yī)學(xué)牙周病學(xué)實(shí)習(xí)教學(xué)中的應(yīng)用09-23

談多媒體CAI在中學(xué)英語(yǔ)課堂教學(xué)中的優(yōu)點(diǎn)09-07

Minitab軟件在高職概率統(tǒng)計(jì)教學(xué)中的應(yīng)用09-19

工業(yè)造型設(shè)計(jì)教學(xué)中CFD軟件的應(yīng)用08-20