計(jì)算機(jī)程式及實(shí)習(xí)期末報(bào)告ppt制作-資料下載頁
2025-07-21 17:22本頁面
【正文】 76 If (quit = ) Then 77 End 39。程式結(jié)束 78 End If 79 End Sub 80 End Class 程式說明 ? 第 3行宣告金額的參數(shù) ? 第 5行宣告 MsgBox變數(shù)來接受傳回值 ? 第 6至 8行將起站臺(tái)北訂為 0元 ? 第 9至 11行將起站板橋訂為 40元 ? 第 12至 14行將起站桃園訂為 160元 ? 第 15至 17行將起站新竹訂為 290元 ? 第 18至 20行將起站臺(tái)中訂為 700元 ? 第 21至 23行將起站嘉義訂為 1080元 程式說明 ─續(xù) ? 第 24至 26行將起站臺(tái)南訂為 1350元 ? 第 27至 29行將起站左營訂為 1490元 ? 第 30至 32行將訖站臺(tái)北訂為 0元 ? 第 33至 35行將訖站板橋訂為 40元 ? 第 36至 38行將訖站桃園訂為 160元 ? 第 39至 41行將訖站新竹訂為 290元 ? 第 42至 44行將訖站臺(tái)中訂為 700元 ? 第 45至 47行將訖站嘉義訂為 1080元 程式說明 ─續(xù) ? 第 48至 50行將訖站臺(tái)南訂為 1350元 ? 第 51至 53行將起站左營訂為 1490元 ? 第 54至 56行將原價(jià)打 97折之起站和訖站差之票價(jià)記至 ? 第 57至 59行將原價(jià)打 9折之起站和訖站差之票價(jià)記至 ? 第 60至 62行將原價(jià)打 7折之起站和訖站差之票價(jià)記至 程式說明 ─續(xù) ? 第 63至 68行將滑鼠在 Button1上點(diǎn)選時(shí)價(jià) ? 第 69至 73行為超連結(jié)標(biāo)籤的應(yīng)用 ? 第 74至 80行為按下 Button2按鈕，出現(xiàn)有提示訊息之輸出對話方塊，「 36」代表 MsgBox第 4項(xiàng)按鈕代碼加上第 32項(xiàng)警示圖示代碼，其按鈕格式碼等於 4+32 按鈕代碼 警示圖示代碼 心得 這一次的程式設(shè)計(jì)確實(shí)相當(dāng)不容易，製作過程中遇到不少的問題，有時(shí)候是程式碼少了一項(xiàng)宣告，有時(shí)候是按鈕按下後毫無反應(yīng)，但不因此氣餒，想努力解決程式當(dāng)中的錯(cuò)誤，在反覆地修正調(diào)整後，終於可以正常的偵錯(cuò)時(shí)，心情極度喜悅歡愉。最後也要感謝老師您上課用心的講解。 參考文獻(xiàn) 1.《 Visual Basic 2022學(xué)習(xí)寶典 》 ，臺(tái)北：勁園圖書， 2022 《 Visual Basic 2022程式設(shè)計(jì)範(fàn)例教本 》 ，臺(tái)北：旗標(biāo)， 2022 《 學(xué)會(huì)寫程式 Visual Basic2022》 ，臺(tái)北：碁峯資訊， 2022 《 Visual Basic2022基礎(chǔ)必修課 》 ，臺(tái)北：碁峯資訊， 2022
試題試卷相關(guān)推薦
鄂ICP備17016276號(hào)-1