Non so se in questo caso ti possono essere utili ma prova la funzione CDec(), FormatNumber()
Se poi il punto di 3.350,50 crea problemi lo puoi eliminare con Replace(numero, ".","")
Ti ricordo che il campo del Db deve essere di tipo Decimale