Spanish Decimal separator

Hola a todos:
Estoy empezando con basic4ppc.

Trabajando con sqlite, consiguo un valor
TxbBox.text = Main.GVenta_Reader.GetValue(6) ' es = 2,5 pone la coma como separador.
pero cuando lo guardo es 2
Main.GVenta_Command.SetParameter("Precio", TxbBox.Text)

Si en TxtBox.text pongo 2.5, con un punto como separador decimal, si que lo guarda bien. Pero despues cuando vuelvo a leer el campo me lo pone con la coma, como el separador decimal. 2,5.

A falta de una solución mejor lo que tengo que hacer es
TxbBox.text = Main.GVenta_Reader.GetValue(6) ' es = 2,5
TxbBox.Text = StrReplace(TxbBox.Text, ",", ".")

Gracias y un saludo.