使用SqlHelper的一个小技巧(3)

                            If (Config.TrimString) Then
                                str = str.Trim()
                            End If

                            If (Config.EmptyStringToNull AndAlso str.Length = 0) Then
                                str = Nothing
                            End If

                            p.Value = str
                        End If
                    Case DbType.Boolean
                        If (Config.NullBooleanToFalse AndAlso p.Value Is Nothing) Then
                            p.Value = False
                        End If
                End Select

                If (Config.NullValueToDBNull AndAlso p.Value Is Nothing) Then
                    p.Value = DBNull.Value
                End If