Public Class NullHandler
    Public Shared Function CToSqlInt(ByVal value As Integer) As SqlTypes.SqlInt32
        If value = Config.NullReplacer Then
            Return SqlTypes.SqlInt32.Null
        Else
            Return SqlTypes.SqlInt32.Parse(value.ToString())
        End If
    End Function
    Public Shared Function CToSqlString(ByVal value As String) As SqlTypes.SqlString
        If value = Config.NullReplacer.ToString() Then
            Return SqlTypes.SqlString.Null
        Else
            Return New SqlTypes.SqlString(value)
        End If
    End Function
    Public Shared Function CToSqlDateTime(ByVal value As DateTime) As SqlTypes.SqlDateTime
        If value = DateTime.MinValue Then
            Return SqlTypes.SqlDateTime.Null
        Else
            Return New SqlTypes.SqlDateTime(value)
        End If
    End Function
End Class