Per non avere problemi setta il campo del database come testo. Poi prima di fare l'update ricomponi la cifra:
codice:
Dim NewCifra as string

NewCifra=TextBoxIntero.text &"."& TextBoxDecimale.text
Poi la inserisci nella sql normalmente:

codice:
UPDATE Tabella SET Campo='"& NewCifra &"' WHERE ...