23 lines
1.4 KiB
VB.net
23 lines
1.4 KiB
VB.net
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
|