vb課程設(shè)計(jì)報(bào)告書(shū)(飯店點(diǎn)菜系統(tǒng))(存儲(chǔ)版)
【正文】 = 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)過(guò)此次短暫而充實(shí)的 vb 課程設(shè)計(jì)實(shí)習(xí)體驗(yàn)，我切身感受到了理論與實(shí)踐之間的差距，深刻體會(huì)到了親手實(shí)踐的重要性。第 4 章 系統(tǒng)實(shí)現(xiàn) 登錄界面及其代碼Private Sub Command1_Click()End SubPrivate Sub Command2_Click()EndEnd Sub 酒店主頁(yè)界面及其代碼Private Sub Command1_Click()End SubPrivate Sub Command2_Click()End SubPrivate Sub Command3_Click()End Sub 點(diǎn)菜界面及其代碼Private Sub Command1_Click() = select * from 酒水 = LoadPicture( + )End SubPrivate Sub Command10_Click()End SubPrivate Sub Command11_Click()If Val() = 300 Then = TrueEnd IfEnd SubPrivate Sub Command12_Click() If Then End If = LoadPicture( + )End SubPrivate Sub Command13_Click() If Then End If = LoadPicture( + )End SubPrivate Sub Command2_Click() = select * from 湯類(lèi) = LoadPicture( + )End SubPrivate Sub Command3_Click() = select * from 主食 = LoadPicture( + )End SubPrivate Sub Command4_Click() = se
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1