寫一個函式

函式是在執行期間將被多次呼叫的程式碼塊。可以在函式內部編寫此程式碼，並在需要時呼叫該函式，而不是一次又一次地編寫同一段程式碼。

功能：

• 必須在類或模組中宣告
• 返回一個值（由返回型別指定）
• 有修飾語
• 可以通過引數來進行處理

Private Function AddNumbers(X As Integer, Y As Integer) As Integer
    Return X + Y
End Function

函式名稱可以用作 return 語句

Function sealBarTypeValidation() as Boolean
    Dim err As Boolean = False

    If rbSealBarType.SelectedValue = "" Then
        err = True
    End If

    Return err
End Function

和…一樣

Function sealBarTypeValidation() as Boolean
    sealBarTypeValidation = False        

    If rbSealBarType.SelectedValue = "" Then
        sealBarTypeValidation = True
    End If

End Function