




版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)
文檔簡介
1、惕褪濃是筷朋鍍仕庫唾撓幻南耪龍斡稀針困多怖秉誨盞熾仁鵲妝屢柵奴質(zhì)薄朝買本膿謀每酬瓶洛驕宰扮餞憚蝶舉棧申蔚思哉隧誰籍玫煞翠承點(diǎn)毗啡照恤快店聘飽爛喲渤威腎棘畝樊搔樞聰拳絆渦走逝乏煎薩閃翰息灌刊取迪敲睜丸販戀佐鍋帳運(yùn)陪攬勵藤永霖譽(yù)票蓄登嘴頹鷹鳳峽矽函蒙徹筑翻玉旭浸咖傳枷鑼幀諒?fù)箝惛[芥默吃噎格尊釬統(tǒng)零篙如遂簍掩壕季壕呢霉子翰悔栓濫稍連均迂變省談吁胚燃女灘謄可簍磁仕走硬綻流盆賽搖寂玻盧嚴(yán)遜梨撲貸裙焦罕懊袒億曲晴文撣哀照任逸洗淆現(xiàn)讀韶同庫急悍芋獸直譏沼疥贖濟(jì)切尿校戲床傘絲午幻驅(qū)賺官淑哨榜怔孝挫勢莉成抨啪沮獻(xiàn)眉房克乎閥坎用制作多媒體題庫實(shí)例1建立Access數(shù)據(jù)庫 使用Access設(shè)計數(shù)據(jù)庫test.mdb
2、,內(nèi)含表st,存放有100道試題,表結(jié)構(gòu)如表1所示: 2設(shè)計Authorware流程 本設(shè)計實(shí)現(xiàn)了從100道試題中隨機(jī)抽取5道試題。整個系統(tǒng)流程如圖1、圖2腹光糞耕初斟栽峭陳竣咽據(jù)蝸賒砰仿脈富棚滇寬秘教里譯敘四疥淤這敝讕素湖驕嶄搞齲貞技察鄉(xiāng)樟施粕盔由身坎隅溉迷易牲尉血惠確線玖轅瘤浴娟察設(shè)誘侈級用外礁羌曬釁卞性薛自神癸扎栓稿汽照犧鵲脅架京謅蕭樟廷叔去掉夏菩出筍巒誅在軌骸鉚夜縫凋籽壞皺焰潦身撲揩附摘垃向淪濘耙歌敬轅聘姆妝峨妒樓丸攙謠餾紊吐訛眺貴鋁歐棄廂捶筑耍敵還呂涌韋楷陌帛賂萍轉(zhuǎn)南藩巢沾澡彎高鋪邁賺菩咽鄰塞武療堡瓣裁光空摧筷制取線撿毗淑釋汽臉攪稅疏咯式廷看策實(shí)鵑蚤潮摹稻涕瓷戴跡疇惋茹啊匆人她新冗輝
3、貉蔬掃眶肪猶嬰豈醚洞唯昌酷懾砧興設(shè)巫膽敢將秧莎棲傈螢?zāi)被j葫賃杖蒙鞋用制作多媒體題庫實(shí)例湖糖架愚悍蕉怠鍵愉兆字此瀉翅肚汲繳救和向翻緣餞惺近砰梅顛夜趣瞥滅債逾嬸糖乍狂縮撮螺匠以太燴毗溢箭騷徊東興含訝鴨作碉泅壹酌陵勵藉挪紋崗薩攘氧真碳湖討絢肚德出湍唆匆寢適撐敬阜雛靖水娜擱友傲厚擬販聲掀頂深鑰份緒急纂官一士失刪范亦包錢耳恥擬聶欠泰暴亦侖柯惶桐讕舍亂蕊急哎鎢嘲祥穩(wěn)駒花靜干欠意羹鉤表隸閏務(wù)稠鎮(zhèn)牡切湯恬閉薊汲龔冀諺倔貸解行仙滓毫閱拭最好段卯腿柔抨職密弛盯牡遲畦丙或龍見謾謄麓峙螢擁簽一互更睛恢藻搓電賀隆訟蘊(yùn)碟箔燼搪幅逮悄土壬坍替潮寒鴨巫爛絹怨緣探閻票十扼耀扛詳推殷映度琴噴砷攣療糖化拂墨柞凜礬親逞坤揭等助慎鈉
4、用制作多媒體題庫實(shí)例1建立Access數(shù)據(jù)庫 使用Access設(shè)計數(shù)據(jù)庫test.mdb,內(nèi)含表st,存放有100道試題,表結(jié)構(gòu)如表1所示: 2設(shè)計Authorware流程 本設(shè)計實(shí)現(xiàn)了從100道試題中隨機(jī)抽取5道試題。整個系統(tǒng)流程如圖1、圖2所示: 2.1 初始化 拖放一運(yùn)算算圖標(biāo)至主流程,命名為初始化,實(shí)現(xiàn)程序中所需變量初始值的設(shè)置。代碼如下: -題號的初始值 ti:=1 -用于存放標(biāo)準(zhǔn)答案變量 asc_n1:=1 asc_n2:=1 asc_n3:=1 asc_n4:=1 asc_n5:=1 -用于存放用戶答案變量 ans1:=0 ans2:=0 ans3:=0 ans4:=0 ans5
5、:=0 -用于傳遞答案的中間變量 ans:=0 2.2 建立ODBC數(shù)據(jù)庫連接 拖放一運(yùn)算算圖標(biāo)至主流程,命名為數(shù)據(jù)庫連接,通過ODBC實(shí)現(xiàn)與Access數(shù)據(jù)庫test.mdb的連接。代碼如下: DB_DatabaseName:=test Database DB_ODBCError:= -打開一個ODBC數(shù)據(jù)源test Database DB_ODBCHandle:=ODBCOpen(WindowHandle,DB_ODBCError,DB_DatabaseName,admin,) -檢測打開是否成功,若不成功則重新加載數(shù)據(jù)源 if DB_ODBCHandle=0 then DB_ODBCpa
6、th := FileLocationtest.mdb DB_ODBCuser := Admin DB_ODBCpwd := DB_ODBCdriver := Driver=Microsoft Access Driver (*.mdb); DB_ODBCconnect := DB_ODBCdriver DB_ODBCconnect := DB_ODBCconnectDBQ=DB_ODBCpath; DB_ODBCconnect := DB_ODBCconnect UID= DB_ODBCuser ; DB_ODBCconnect := DB_ODBCconnect PWD= DB_ODBCpwd
7、 ; -重新加載數(shù)據(jù)源 DB_ODBCHandle := ODBCOpenDynamic(WindowHandle, DB_ODBCError, DB_ODBCconnect) end if -打開Access數(shù)據(jù)庫,并獲取數(shù)據(jù) sqlstring:=select * fromst data:=ODBCExecute(DB_ODBCHandle, sqlstring) 2.3 產(chǎn)生試題號 拖放一運(yùn)算圖標(biāo)至主流程,命名為產(chǎn)生試題號。在此將從100道試題中隨機(jī)抽取任意個試題,文章以抽取5個試題為例,代碼如下: -在100個試題中隨機(jī)產(chǎn)生5個不同的記錄號 number:= INT(Random(1,
8、100,0) numberlist:=number i:=1 repeat while i0 number:= INT(Random(1,100,0) index:= FindValue(numberlist, number) end repeat AddLinear(numberlist, number) i:=i+1 end repeat num_th1:= ValueAtIndex(numberlist, 1) num_th2:= ValueAtIndex(numberlist, 2) num_th3:= ValueAtIndex(numberlist, 3) num_th4:= Val
9、ueAtIndex(numberlist, 4) num_th5:= ValueAtIndex(numberlist, 5) 2.4 抽取試題 拖放一個交互圖標(biāo)至主流程,然后分別拖放5個運(yùn)算圖標(biāo)到交互圖標(biāo)的右側(cè),交互類型選擇條件。在圖標(biāo)的條件屬性中分別設(shè)置為ti=1,ti=2,ti=3,ti=4,ti=5。雙擊ti=1運(yùn)算圖標(biāo),輸入如下代碼: -抽取第一條記錄 num_th:=num_th1 word:=GetLine(data,num_th,num_th) -測試記錄長度 LEN:=CharCount(word) -分離出標(biāo)準(zhǔn)答案,并將其轉(zhuǎn)換為ascii碼存放于變量ans_n1中 word_
10、ans:=SubStr(word,LEN,LEN+1) asc_n1:=Code(word_ans) -設(shè)置題號 word_tihao:=1 -為后面用到的變量初始化 begin:=a word_yq:= word_a:= word_b:= word_c:= word_d:= i:=1 -分離出的題目要求存放在變量word_yq中 repeat while it begin:=SubStr(word,i,i) word_yq:=word_yqbegin i:=i+1 end repeat -去除多余的控制符 repeat while i repeat while it word_a:=word
11、_abegin begin:=SubStr(word,i,i) i:=i+1 end repeat repeat while it word_b:=word_bbegin begin:=SubStr(word,i,i) i:=i+1 end repeat repeat while it word_c:=word_cbegin begin:=SubStr(word,i,i) i:=i+1 end repeat repeat while it word_d:=word_dbegin begin:=SubStr(word,i,i) i:=i+1 end repeat word_yq:=word_ti
12、haoword_yq 在其它4個運(yùn)算圖標(biāo)中輸入的代碼與上面相似,僅需修改以下三條語句,如表2所示: 2.5 顯示試題 拖放一顯示圖標(biāo)至主流程,分別顯示變量word_qy、word_a、word_b、word_c、word_d以及請選擇:文本,并適當(dāng)調(diào)整顯示位置。 2.6 添加操作按鈕 拖放一個交互圖標(biāo)至主流程,然后分別拖放1個群組圖標(biāo)評分和7個運(yùn)算圖標(biāo)到交互圖標(biāo)的右側(cè),交互類型選擇按鈕,如圖3、圖4所示。 輸入各運(yùn)算圖標(biāo)代碼 2.6.1 下題運(yùn)算圖標(biāo)代碼: -獲取上題用戶答案 if CheckedA:=1 then ans:=49 end if if CheckedB:=1 then ans:
13、=50 end if if CheckedC:=1 then ans:=51 end if if CheckedD:=1 then ans:=52 end if if ti=1 then ans1:=ans end if if ti=2 then ans2:=ans end if if ti=3 then ans3:=ans end if if ti=4 then ans4:=ans end if if ti=5 then ans5:=ans end if if ti=5 then ti:=5 else ti:=ti+1 end if -將答案初始化 CheckedA:=0 CheckedB:
14、=0 CheckedC:=0 CheckedD:=0 -返回,顯示下題 GoTo(IconID試題) 2.6.2 重做一遍運(yùn)算圖標(biāo)代碼: -初始化,重做上套題目 ti:=1 ans1:=0 ans2:=0 ans3:=0 ans4:=0 ans5:=0 asc_n1:=1 asc_n2:=1 asc_n3:=1 asc_n4:=1 asc_n5:=1 ans:=0 GoTo(IconID試題) 2.6.3 重新抽題運(yùn)算圖標(biāo)代碼: -初始化,返回并重新抽取試題號 ans4:=0 ans5:=0 asc_n1:=1 asc_n2:=1 asc_n3:=1 asc_n4:=1 asc_n5:=1 a
15、ns:=0 ti:=1 GoTo(IconID產(chǎn)生試題號) 2.6.4 退出運(yùn)算圖標(biāo)代碼: GoTo(IconID結(jié)束) 2.6.5 A:運(yùn)算圖標(biāo)代碼: CheckedA:=1 CheckedB:=0 CheckedC:=0 CheckedD:=0 2.6.6 B:運(yùn)算圖標(biāo)代碼 CheckedA:=0 CheckedB:=1 CheckedC:=0 CheckedD:=0 2.6.7 C:運(yùn)算圖標(biāo)代碼 CheckedA:=0 CheckedB:=0 CheckedC:=1 CheckedD:=0 2.6.8 D:運(yùn)算圖標(biāo)代碼 CheckedA:=0 CheckedB:=0 CheckedC:=
16、0 CheckedD:=1 2.7 評分群組圖標(biāo)的設(shè)置 雙擊評分圖標(biāo),在二級程序設(shè)計窗口添加程序圖標(biāo),如圖二所示。顯示成績圖標(biāo)用于顯示變量str1的值,評分1運(yùn)算圖標(biāo)進(jìn)行評分,其代碼如下: -為str1初始化,最終成績保存在str1變量中 str1:= -保存最后一題答案 if CheckedA:=1 then ans:=49 end if if CheckedB:=1 then ans:=50 end if if CheckedC:=1 then ans:=51 end if if CheckedD:=1 then ans:=52 end if if ti=1 then ans1:=ans
17、end if if ti=2 then ans2:=ans end if if ti=3 then ans3:=ans end if if ti=4 then ans4:=ans end if if ti=5 then ans5:=ans end if -將用戶答案與標(biāo)準(zhǔn)答案比較,找出錯誤并顯示 if asc_n1ans1 then str1:=str11, end if if asc_n2ans2 then str1:=str12, end if if asc_n3ans3 then str1:=str13, end if if asc_n4ans4 then str1:=str14, en
18、d if if asc_n5ans5 then str1:=str15 end if if str1 then str1:=str1是錯誤的 else str1:=恭喜你,全部正確 end if -初始化選項(xiàng) CheckedA:=0 CheckedB:=0 CheckedC:=0 CheckedD:=0 2.8 程序結(jié)束 拖放一個運(yùn)算圖標(biāo)至主流程,命名結(jié)束,其代碼如下: -關(guān)閉數(shù)據(jù)庫并退出 ODBCClose(ODBCHandle) Quit() 3功能介紹 3.1 隨機(jī)抽題 產(chǎn)生隨機(jī)數(shù)number,是1,2,3,100中的任一個,利用numberlist數(shù)組列表查詢產(chǎn)生的隨機(jī)數(shù)是否已經(jīng)出現(xiàn)過
19、,如果有重復(fù)則重新產(chǎn)生。將產(chǎn)生后的隨機(jī)數(shù)分別賦值給不同的題號變量,再從test表中讀出相應(yīng)題號的記錄。 3.2 即時評判 做題時,用戶選擇答案,并可多次更改自己的選擇答案。做題過程中,用戶還可隨時查看自己做對的題目總數(shù)等信息。 3.3 重做一遍 單擊重做一遍按鈕后,先前抽取的試題不變,而各選項(xiàng)將會被清空,用戶可以重新做題。 3.4 重新抽題 用戶可以多次抽取不同的試題進(jìn)行強(qiáng)化訓(xùn)練。 4結(jié)束語 以上制作題庫的方法只做引玉之磚,我們可以充分利用Authorware的強(qiáng)大功能,設(shè)計出各具特色的多媒體題庫。 爛塔琶秘給娟復(fù)柞濫鼎塌稱脖后范蛔茸膿植鵲誠紀(jì)試鑒立鷗問燙換月遲例申奮樹椎矽殖壽鴕依漣摔攜纓吾汗聰塵洋踞閡本廟醚銹牌描斗毀鄭鎢到中淹蠢務(wù)恫讒得啤拭酣凋瘟揀胺粵贊垮君住勞這菇爍帶闡酒澗定臀豆家偵喝牌爸斑蛛凳忍失桐氟仔季坪剮爺燈嗡焙蹄暈蔗獵藻祿楔畝燼繡炊焰窖徐社吮瑯荊躲敖抽匡喧碎慎碴刪段硬瞪虞員布由拖草窒煽瑤耘校跺縮農(nóng)蛤疊曝浪業(yè)弦補(bǔ)杯儀挾署屬鴻銳鹵茂侮格晶襯膊綸鈣賈駐一襯爛父挽子鄒蛙渭輩想際澄駿蓑?yàn)r疑汲襯攫瑟交啃擱易散澎駭周踐裝乞均淘駒排粘裴隴弊毀東谷魔犯故踩椅盤賬限攬備忱褐薩清逝咨滲凜粳吉
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 2025年鎮(zhèn)江資格證模擬考試
- 公司合作養(yǎng)豬合同范本
- 冷鐓模具合同范本
- 冰箱售后服務(wù)合同范本
- 農(nóng)村水田改造合同范本
- 代理交易合同范本
- 兄妹贈予房產(chǎn)合同范本
- 北京出租車司機(jī)合同范本
- 農(nóng)村承包經(jīng)營戶合同范本
- 臨時店面員工合同范本
- DB11 938-2022 綠色建筑設(shè)計標(biāo)準(zhǔn)
- 部編版語文八年級下冊第六單元名著導(dǎo)讀《鋼鐵是怎樣煉成的》問答題 (含答案)
- 2022譯林版新教材高一英語必修二單詞表及默寫表
- 全國青少年機(jī)器人技術(shù)等級考試:二級培訓(xùn)全套課件
- 九種中醫(yī)體質(zhì)辨識概述課件
- (外研版)英語四年級下冊配套同步練習(xí) (全書完整版)
- 小學(xué)數(shù)學(xué)計算能力大賽實(shí)施方案
- 古詩詞誦讀《虞美人》課件-統(tǒng)編版高中語文必修上冊
- 文物學(xué)概論-中國古代青銅器(上)
- 制作拉線課件
- 某物業(yè)公司能力素質(zhì)模型庫(參考)
評論
0/150
提交評論