T3_1_PL_Ass計算.vb 詳細說明書

目的

用來執行棧板式自動倉儲（PL_Ass型）設計計算的主表單類別。 接收各種輸入參數後，自動計算倉庫所需的尺寸、面積及層數結構等。

主要屬性

此類別繼承自 System.Windows.Forms.Form，並包含了大量的文字方塊(Tb)、 標籤(L)、按鈕(Bt)、面板(Panel)等 UI 控制項。 主要的變數如下所示：

• PL尺寸相關: PL寬度, PL深度, PL總高, PL厚度, 貨物高度
• 倉儲結構: 座數, 列數, 層數, 行數, PL儲存數
• 空間相關: 相鄰間距(C), 貨架間距(C), 支柱寬度
• 計算結果: 貨架總寬, 貨架總長, 貨架總高, 所需寬度, 所需長度, 所需高度
• 層數結構: 最上層, 有補強材層, 無補強材層, 最低高度
• 面積相關: 總樓面面積, 總虛擬樓面面積, 佈局面積, 防火牆數量

主要方法/函式

• PL_Ass計算_Load - 表單初始化與啟動主程式
• Tb讀取 - 從文字方塊讀取資料
• PL_Ass計算 - 主要的計算邏輯
• 計算開始Bt_Click - 點擊計算按鈕時的處理程序
• 封面Pb_Click / 開始Bt_Click - 標籤頁切換處理
• 關閉Bt_Click - 表單關閉處理程序

功能說明

表單載入時執行的事件處理常式。負責設定版權顯示、有效期限顯示、 有效期限檢查、讀取初始資料，並執行初次計算。

參數

回傳值

型別: 無 (Sub)
說明: 因屬事件處理常式，故無回傳值

處理流程

1. 設定版權標籤與有效期限標籤的文字
2. 取得目前日期，並與試用版有效期限進行比較
3. 若已過期，則顯示訊息方塊並關閉表單
4. 若在有效期限內，則呼叫 Tb讀取() 來讀取資料
5. 呼叫 PL_Ass計算() 執行初次計算

功能說明

讀取各文字方塊中輸入的數值，並儲存至變數中。 同時也會進行部分計算（例如算出貨物高度）。

參數

無

回傳值

型別: 無 (Sub)
說明: 僅將數值設定至內部變數

處理流程

1. 從文字方塊讀取 PL寬度、PL深度、PL總高、PL厚度
2. 計算 貨物高度 = PL總高 - PL厚度，並顯示於文字方塊中
3. 讀取座數、列數、層數
4. 讀取相鄰間距(C)

功能說明

計算棧板式自動倉儲各種尺寸與面積的主程式。 會依序計算儲存數量、貨架尺寸、列間距、層數結構、所需空間、樓面面積、虛擬樓面面積、防火牆數量以及佈局面積等。

參數

無（使用類別內的變數）

回傳值

型別: 無 (Sub)
說明: 計算結果會顯示於各文字方塊中

處理流程

1. 儲存數量計算:
   • 行數 = 座數 × 2
   • PL儲存數 = 行數 × 列數 × 層數
2. 貨架總寬計算:
   • 貨架通道寬度 = PL寬度 + 200
   • 貨架總寬 = (PL寬度 + 100) × 2 + 貨架通道寬度
   • 所需寬度 = 貨架總寬 + 相鄰間距(C) × 2
3. 列間距計算:
   • 列間距 = 支柱寬度 + PL深度 + 貨架間距(C) × 2
4. 貨架長度計算:
   • 貨架總長 = 列間距 × 列數 + 貨架間距(C)
5. 所需長度計算:
   • 所需長度 = 貨架總長 + 貨架後部長度 + 維修通道 + 進出貨輸送帶長度 + 搬運通道
6. 層數結構計算:
   • 最上層 = PL總高 + 升降間距(C) + 補強材厚度 + 220（最小值為 1600）
   • 有補強材層 = PL總高 + 升降間距(C) + 補強材厚度 + 升降間距(C) + 懸臂厚度
   • 有補強材層_層數 = Int(層數 / 3)
   • 無補強材層 = PL總高 + 升降間距(C) + 懸臂厚度
   • 無補強材層_層數 = 層數 - 有補強材層_層數 - 1
7. 貨架總高・所需高度計算:
   • 貨架總高 = 最低高度 + (有補強材層 × 有補強材層_層數) + (無補強材層 × 無補強材層_層數) + 最上層
   • 所需高度 = 貨架總高 + 天花板間距(C)
8. 單座所需面積計算:
   • 單座所需面積 = Int(所需寬度 × 所需長度 / 1000²)
9. 虛擬樓面計算:
   • 最上層懸臂上面高度 = 貨架總高 - 最上層
   • 虛擬樓面數 = Int(最上層懸臂上面高度 / 5000)
   • 虛擬樓面數面積 = 虛擬樓面數 × (貨架總寬 × 貨架總長)
   • 單座虛擬樓面面積 = Int(虛擬樓面數面積 / 1000²)
10. 佈局面積計算:
    • 佈局寬度 = (貨架總寬 + 相鄰間距(C)) × 座數 + 相鄰間距(C)
    • 總樓面面積 = ((佈局寬度 × 所需長度) × 座數) / 1000²
    • 總虛擬樓面面積 = 單座虛擬樓面面積 × 座數
11. 防火牆計算:
    • 防火牆判斷用面積 = 總樓面面積 + 總虛擬樓面面積
    • 防火牆數量 = Int(防火牆判斷用面積 / 1500)
    • 防火牆厚度 = 150
    • 佈局面積 = ((佈局寬度 + 防火牆數量 × (防火牆厚度 + 200)) × 所需長度) / 1000²

功能說明

點擊「計算開始」按鈕時所執行的事件處理常式。 會重新讀取資料並執行重新計算，同時切換結果顯示區的背景顏色以提供視覺回饋。

參數

回傳值

型別: 無 (Sub)
說明: 因屬事件處理常式，故無回傳值

處理流程

1. 透過 Tb讀取() 重新讀取資料
2. 透過 PL_Ass計算() 執行重新計算
3. 根據 計算開始_Chk 旗標，切換主要結果文字方塊的背景色（Yellow ⇔ Aquamarine）
4. 根據 計算開始_Chk2 旗標，切換 Panel1 的背景色（LightYellow ⇔ PowderBlue）

功能說明

點擊封面圖片（Pb）或開始按鈕時， 將標籤頁控制項切換至「PL自動倉庫Tp」標籤。

參數

回傳值

型別: 無 (Sub)
說明: 因屬事件處理常式，故無回傳值

處理流程

1. 將 TabControl1 的 SelectedTab 屬性設定為 PL自動倉庫Tp

功能說明

點擊「關閉」按鈕時關閉表單。

參數

回傳值

型別: 無 (Sub)
說明: 因屬事件處理常式，故無回傳值

處理流程

1. 使用 Me.Close() 來關閉表單