MS_06022016

This commit is contained in:
SchreiberM
2016-02-08 09:24:29 +01:00
parent ab475bfa7a
commit 85d4120c50
14 changed files with 229 additions and 149 deletions

View File

@@ -19,7 +19,7 @@
End If
End Function
Public Function NotNull(ByVal value As Integer, ByVal defaultValue As Integer) As Integer
Public Function NotNullInt(ByVal value As Integer, ByVal defaultValue As Integer) As Integer
If IsNothing(value) OrElse IsDBNull(value) OrElse value = 0 Then
Return defaultValue
Else