【正文】
= d Then = 恭喜您獲得一等獎 ElseIf a = b And b = c And c d Or a = c And c = d And a b Or b = c And c = d And a b Then = 恭喜您獲得二等獎 ElseIf a = b And b c And b d Or a = c And a b And a d Or a = d And a b And a c Or b = c And b a And b d Or b = d And b a And b c Or c = d And c a And c b Then = 恭喜您獲得三等獎 Else = 恭喜您獲得四等獎 End IfEnd SubPrivate Sub Command3_Click()End SubPrivate Sub Form_Load() = False = 100End SubPrivate Sub Timer1_Timer() = Round(Rnd * 9) = Round(Rnd * 9) = Round(Rnd * 9) = Round(Rnd * 9)a = b = c = d = End Sub第 5 章 總結(jié) 總結(jié)“實踐是檢驗真理的唯一標(biāo)準(zhǔn)!”經(jīng)過此次短暫而充實的 vb 課程設(shè)計實習(xí)體驗,我切身感受到了理論與實踐之間的差距,深刻體會到了親手實踐的重要性。以往都只是坐在課堂里聽老師講一些教材既有的知識,所學(xué)到的東西也僅僅只停留在理論層面,付諸于實踐的機會很少,很難對所掌握的理論進行及時的檢驗。此次實習(xí)給了我這樣一個檢驗甚至是考驗自己能力的機會,在此過程中我認識到了自己的很多不足,比如課本知識記憶不深,知識面太過狹隘,重點知識點掌握不透,自學(xué)與查詢相關(guān)文獻能力還有待提高;同時,我也接觸到了一些 vb 深層次的東西,其復(fù)雜性與豐富性更激發(fā)了我對本課程的興趣,激發(fā)了我努力學(xué)好 vb 的動力,提升了自身的學(xué)習(xí)主動性與嚴謹性,得到了充實而難得的一次鍛煉。 存在的主要問題由于此次 vb 課程設(shè)計報告涉及的知識層面比較深廣,更顯示出了自己自學(xué)能力以及查詢并參考文獻的能力的薄弱,尤其是教材后期關(guān)于數(shù)據(jù)庫的知識比較陌生,靠自學(xué)并不能把知識理解透徹,做起題來有一定的困難;其次是編程過程中不夠嚴謹,對于一些固定的用法及規(guī)則掌握不清楚,編寫程序時經(jīng)常犯一些低級性的小錯誤,時常導(dǎo)致程序無法運行,調(diào)試時經(jīng)常無法抓住錯誤的關(guān)鍵所在;這些都在于自己對本課程知識掌握得不夠好,實踐能力還有待提高和加強。參考文獻1.《Visual Basic 程序設(shè)計 》 王學(xué)軍、李靜 中國鐵道出版社2.《Visual Basic 程序設(shè)計上機指導(dǎo)與習(xí)題集 》 王學(xué)軍、李靜 中國鐵道出版社3.《Visual Basic 編程案例精解 》 張路平 電子工業(yè)出版社4.《Visual Basic 程序設(shè)計基礎(chǔ)教程 》 羅朝盛 人民教育出版社