Ho una form che contiene i dati di alcuni clienti, ragione sociale, indirizzo, tel ecc. e potrebbe capitare che uno di questi dati per un cliente non sia conosciuto quindi nella tabella clienti quel campo sia vuoto, il problema e che se nella select che popola la form viene incontrato un campo vuoto mi da questo errore:

codice:
An unhandled exception of type 'System.InvalidCastException' occurred in microsoft.visualbasic.dll

Additional information: Cast from type 'DBNull' to type 'String' is not valid.
Il db che uso è Access 2000 ed il codice per connettermi al db è questo:

codice:
Me.OleDbConnection1.Open()

Me.OleDbCommand1.CommandText = "update clienti inner join riferimenti " & _
                                        "on clienti.idRif = riferimenti.id " & _
                                        "set clienti.settore = '" & TextBoxSettore.Text & _
                                        "', clienti.indirizzo = '" & TextBoxIndirizzo.Text & _
                                        "', clienti.cap = '" & TextBoxCap.Text & _
                                        "', clienti.comune = '" & TextBoxComune.Text & _
                                        "', clienti.prov = '" & TextBoxProv.Text & _
                                        "', clienti.tel = '" & TextBoxTel.Text & _
                                        "', clienti.fax = '" & TextBoxFax.Text & _
                                        "', clienti.cell = '" & TextBoxCell.Text & _
                                        "', clienti.mail = '" & TextBoxMail.Text & _
                                        "', clienti.sitoWeb = '" & TextBoxSitoWeb.Text & _
                                        "', clienti.piocf = '" & TextBoxPiocf.Text & _
                                        "', riferimenti.nome = '" & TextBoxRif.Text & _
                                        "', riferimenti.qualifica = '" & TextBoxQualificaRif.Text & _
                                        "', riferimenti.indirizzo = '" & TextBoxindirizzoRif.Text & _
                                        "', riferimenti.cap = '" & TextBoxCapRif.Text & _
                                        "', riferimenti.comune = '" & TextBoxComuneRif.Text & _
                                        "', riferimenti.prov = '" & TextBoxProvRif.Text & _
                                        "', riferimenti.tel = '" & TextBoxTelRif.Text & _
                                        "', riferimenti.fax = '" & TextBoxFaxRif.Text & _
                                        "', riferimenti.cell = '" & TextBoxCellRif.Text & _
                                        "', riferimenti.mail = '" & TextBoxMailRif.Text & _
                                        "' where clienti.id = " & TextBoxIdCliente.Text

Me.OleDbCommand1.Connection = Me.OleDbConnection1

OleDbCommand1.ExecuteNonQuery()

Me.OleDbConnection1.Close()