Module modConstant Public Const defInteger As Integer = -999 '宣告整數使用的常數,用以辨識參數是否有傳入Function中。 Public Const defString As String = "Null" '宣告字串使用的常數,用以辨識參數是否有傳入Function中。 Public Const defDateTime As Date = #12/31/1900# '宣告日期使用的常數,用以辨識參數是否有傳入Function中。 Public Const defSingle As Single = -999 '宣告單精準數使用的常數,用以辨識參數是否有傳入Function中。 Public Const defDouble As Double = -999 '宣告雙精準數使用的常數,用以辨識參數是否有傳入Function中。 Public Const strAddTagLabel As String = "extrabase" 'Add by py for Combine Addition XML doc Public Const strAddTagName As String = "ExtraBase" 'Add by py for Combine Addition XML doc Public Const defWinErrCode As String = "0000-899999" Public Const defNullDate As Date = #12/31/1910# '宣告日期使用的常數,用以辨識參數是否要變更為Null。 Public Const defNullInteger As Integer = -9999 '宣告數值使用的常數,用以辨識參數是否要變更為Null。 End Module '2020/01/15 Shih Kai,供前端InvokeSrv_Module時使用,用以辨識是否存入EventLog (1,2,3 >存入) Public Enum _enuInvokeType _Load = 0 _Add = 1 _Edit = 2 _Delete = 3 _Get = 4 End Enum