dotNETportal.cz

Dobrý den, mohl by mi někdo poradit a pokud možno načrtnout kód, jak vyřešit chybovu hlášku při výpisu filtru:

 Private Sub TextBox1_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Leave
        If TextBox1.Text <> "" Then
            Tab1DataGridView.DataSource = Me.DBDataSet.Tab1.Select("A like '" & TextBox1.Text & "'")
        Else
            Tab1DataGridView.DataSource = Me.DBDataSet.Tab1
        End If
    End Sub

(Visual Basic.NET 2008)

V případě, že se začnou vypisovat řádky s hledaným řetězcem ve sloupci "A" a v jiných sloupcích je hodnota Null zahlásí to konflikt převodu DBNull na Date nebo Integer podle typu pole. Našel jsem zde rady ohledně jedné proměnné, ale na celý řádek nevím jak to aplikovat. Bohužel má aplikace je napojena na již funkční databázi a nemám tak možnost definovat typy a výchozí hodnoty ve sloupcích, čímž bych to odstranil.

Děkuji za radu