计算机程式及实习期末报告制作
南台科技大學計算機程式及實習期末報告ppt製作程式名稱:南台保養廠結帳系統 機械工程系 車輛一乙 4A015076 劉柏廷 指導老師:謝慶存 南台保養廠 學習重點: ListBox、RadioButton、PictureBox、CheckBox、GroupBox程式碼撰寫。 程式內容說明:南台保養廠 設計保養廠結帳系統,填寫數量後點選結帳紐進行結帳,並顯示詳細內容在下方空白框中,按清除鍵清除單筆金額,按下優惠鈕後再計算,則總金額會進行優惠。 附加練習 設計使用原廠耗材加100、50,且每一耗材都加,及獨立設計一個單日營業額顯示與消除單日營業額按鈕,按單筆消費兩下即可消除,消費滿3000即享受九折優待,另外在程式上方設計了一個保養廠招牌。 程式啟動畫面-填入數量 填入合成機油數量後,按下「結帳」,計算出金額顯示在下方列表。 選擇優惠選項 點選「清除」鈕,清除第一次結帳金額,再次填入數量後,點選右邊師生優惠-董事×0.7,再按下「結帳」鈕,計算出打七折後的金額。 消費金額滿三千打九折 「合成機油」數量填入十,消費金額達三千元,點選「結帳」紐後,會自動勾選打九折優惠。 列表結帳明細刪除 若要刪除下方列表結帳明細,點選兩下即可刪除,不影響下方當日總營業額。 物件屬性說明 物件 屬性 設定 說明 TBoxPrice1 Text 合成機油價格 TBoxPrice2 Text 機油濾芯價格 TBoxPrice3 Text 空氣濾芯價格 TBoxQty1 Text 合成機油數量 TBoxQty2 Text 機油濾芯數量 TBoxQty2 Text 空氣濾芯數量 RadioButton1 Text ×0.9 校友優惠 RadioButton2 Text ×0.8 師生優惠 RadioButton3 Text ×0.7 董事優惠 RadioButton4 Text ≥3000×0.9 滿3千打九折優惠 物件屬性說明 物件 屬性 設定 說明 Button1 Text 結帳 Button2 Text 清除 Button3 Text 清除當日總營業額 PictureBox Text 保養廠招牌 程式碼撰寫及敘述 Public Class Form1 Dim total, accTotal As Integer 宣告整數變數total, accTotal Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Label6.Text = “$” & total & “元“ 設定文字標籤內容 Label7.Text = “當日總營業額:$” & accTotal & “元“ 設定文字標籤內容 Label6.Font = New Font(“新細明體”, 24) 設定文字標籤內容字型大小 Label6.ForeColor = Color.Red 設定文字標籤顏色 total = 0 預設total=0 9 accTotal = 0 預設 acctotal=0 10