vb課程設(shè)計(jì)報(bào)告書(飯店點(diǎn)菜系統(tǒng))(參考版)
2025-03-26 00:35本頁面
【正文】 參考文獻(xiàn)1.《Visual Basic 程序設(shè)計(jì) 》 王學(xué)軍、李靜 中國鐵道出版社2.《Visual Basic 程序設(shè)計(jì)上機(jī)指導(dǎo)與習(xí)題集 》 王學(xué)軍、李靜 中國鐵道出版社3.《Visual Basic 編程案例精解 》 張路平 電子工業(yè)出版社4.《Visual Basic 程序設(shè)計(jì)基礎(chǔ)教程 》 羅朝盛 人民教育出版社。此次實(shí)習(xí)給了我這樣一個(gè)檢驗(yàn)甚至是考驗(yàn)自己能力的機(jī)會(huì)，在此過程中我認(rèn)識(shí)到了自己的很多不足，比如課本知識(shí)記憶不深，知識(shí)面太過狹隘，重點(diǎn)知識(shí)點(diǎn)掌握不透，自學(xué)與查詢相關(guān)文獻(xiàn)能力還有待提高；同時(shí)，我也接觸到了一些 vb 深層次的東西，其復(fù)雜性與豐富性更激發(fā)了我對(duì)本課程的興趣，激發(fā)了我努力學(xué)好 vb 的動(dòng)力，提升了自身的學(xué)習(xí)主動(dòng)性與嚴(yán)謹(jǐn)性，得到了充實(shí)而難得的一次鍛煉。 Now aEnd SubPrivate Sub Command2_Click()End SubPrivate Sub Command3_Click() = = End SubPrivate Sub Command4_Click()End Sub 抽獎(jiǎng)界面及其代碼Dim a As Integer, b As Integer, c As Integer, d As IntegerPrivate Sub Command1_Click() = True = FalseEnd SubPrivate Sub Command2_Click() = False = FalseIf a = b And b = c And c = d Then = 恭喜您獲得一等獎(jiǎng) 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 = 恭喜您獲得二等獎(jiǎng) 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 = 恭喜您獲得三等獎(jiǎng) Else = 恭喜您獲得四等獎(jiǎng) 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é)“實(shí)踐是檢驗(yàn)真理的唯一標(biāo)準(zhǔn)！”經(jīng)過此次短暫而
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1