VB課程設(shè)-26測(cè)繪C111張爍_第1頁(yè)
VB課程設(shè)-26測(cè)繪C111張爍_第2頁(yè)
VB課程設(shè)-26測(cè)繪C111張爍_第3頁(yè)
VB課程設(shè)-26測(cè)繪C111張爍_第4頁(yè)
全文預(yù)覽已結(jié)束

下載本文檔

版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎn)介

1、.10以內(nèi)加法測(cè)試設(shè)計(jì)報(bào)告學(xué)院 土木工程 班級(jí) 測(cè)繪C111 學(xué)號(hào) 117564 姓名 張爍 成績(jī) 一、設(shè)計(jì)思路1.要達(dá)到的目的綜合利用VB語(yǔ)言進(jìn)行程序設(shè)計(jì)的能力。通過(guò)使用VB的標(biāo)準(zhǔn)控件,加深對(duì)控件的多個(gè)屬性的認(rèn)識(shí)。了解如何使用屬性進(jìn)行程序設(shè)計(jì)。2.關(guān)鍵問(wèn)題的解決運(yùn)用控件屬性進(jìn)行程序設(shè)計(jì)??丶g的聯(lián)系二、模塊之間的調(diào)用關(guān)系,或程序流程圖 點(diǎn)擊開(kāi)始后進(jìn)入測(cè)試界面輸入測(cè)試者名字輸入測(cè)試時(shí)間輸入完后測(cè)試開(kāi)始,隨機(jī)出現(xiàn)10以內(nèi)加法試題,測(cè)試完后,自動(dòng)統(tǒng)計(jì)測(cè)試時(shí)間,正確率,答題數(shù)。三、部分程序關(guān)鍵源代碼及注釋Private Sub Command1_Click()If Command1.Caption

2、 = "開(kāi)始" Then 點(diǎn)擊開(kāi)始,進(jìn)入界面n = InputBox("請(qǐng)輸入您的大名", "提示") 輸入游戲者的名字time = InputBox("請(qǐng)輸入測(cè)試時(shí)間(分)", "的數(shù)學(xué)測(cè)驗(yàn)") 輸入測(cè)試時(shí)間Text4.Text = n Label9.Caption = timeTimer1.Enabled = TrueCall initnCommand1.Caption = "暫停"m = timeLabel9.Caption = Format(m, "00&q

3、uot;) & ":00"ElseIf Command1.Caption = "暫停" Then 點(diǎn)擊暫停后變?yōu)槔^續(xù)Command1.Caption = "繼續(xù)"Timer1.Enabled = FalseElseIf Command1.Caption = "繼續(xù)" Then 點(diǎn)擊繼續(xù)后變?yōu)闀和imer1.Enabled = TrueCommand1.Caption = "暫停"End IfEnd SubDo a = Int(Rnd() * 10) a取0到10之間的數(shù) b = Int

4、(Rnd() * 10) b取0到10之間的數(shù)Loop While a = 0 Or b = 0 條件是a=0或者b=0 c = a + b Label1.Caption = a & "+" & b & "=" 顯示a+b=Private Sub Command2_Click() Timer1.Enabled = False 未輸入時(shí)間Label5.Caption = "測(cè)試被終止!" 則測(cè)試不被允許四、設(shè)計(jì)方案的完善及目前存在的問(wèn)題1設(shè)計(jì)方案要完善的地方控件的調(diào)用以及聯(lián)系圖示應(yīng)更加詳細(xì)。源代碼部分不太詳細(xì)。2

5、. 目前存在的問(wèn)題創(chuàng)新要求沒(méi)有解決。五、本次設(shè)計(jì)的收獲及心得體會(huì)這次的visual basic 課程設(shè)計(jì),通過(guò)自己的努力完成了一個(gè)簡(jiǎn)單的編程算法測(cè)試,在設(shè)計(jì)的過(guò)程中遇到了不少問(wèn)題,發(fā)現(xiàn)了很多自己的不足。通過(guò)不斷的改進(jìn)和完善程序終于有了一個(gè)簡(jiǎn)單的模型。這是學(xué)vb以來(lái)第一次編程序,雖然我的程序還有很多缺陷和不足,但是在編程中學(xué)到了不少東西,也懂得了作為一個(gè)編程人員應(yīng)具備的素質(zhì)?,F(xiàn)在我們的知識(shí)還很少,以后還會(huì)更加努力的學(xué)習(xí)知識(shí),掌握更多的技術(shù)知識(shí)。六、對(duì)該題目和VB設(shè)計(jì)的意見(jiàn)和建議1. 對(duì)該題目的意見(jiàn)和建議這道題目不僅是10以內(nèi)加法設(shè)計(jì),還附加了倒計(jì)時(shí)時(shí)鐘,進(jìn)度條以及模擬鍵盤的使用,對(duì)我們的思維擴(kuò)散有很大的幫助,可以加強(qiáng)對(duì)多個(gè)控件的掌握能力。另外這道題可以適當(dāng)?shù)倪M(jìn)行改進(jìn),比如增加加減法,乘法等一系列運(yùn)算。2對(duì)本次設(shè)計(jì)的意見(jiàn)和建議這次設(shè)計(jì)其中我感覺(jué)在

溫馨提示

  • 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

最新文檔

評(píng)論

0/150

提交評(píng)論