no lostfocus, formato o campo valor como abaixo:
txttotal = Format(txttotal, "##,##0.00")

mas na hora de dar o insert no banco, uso o replace, para trocar a virgula por ponto, ai a formatação acima ficaria com pontos em dois locais, ao invés de uma virgula e um ponto, e ai vem o erro. mas se eu deixar com a virgula, também da erro. Então o que seria correto. To quase achando que fazer operações no banco com insert e update, acaba sendo mais vulnerável que com recordsets.

ninguém usa, insert com ado

Faça a formatação normal como está. Nomeie uma variável tipo Currency e coloque assim depois da formatação, sem problema

cTOTAL = txttotal

Só que para isto voce muda a propriedade DateFormat do controle Text para:

NUMEROS

DECIMAL PLACES = 2

USE SEPARATOR DECIMAL (,)

VERIFIQUE AS CONFIGURAÇÕES REGIONAIS DA MÁQUINA NO PAINEL DE CONTROLE, TEM QUE ESTAR DA MESMA FORMA OU SEJA:

Separador de milhares (.) ponto

Separador decimal (,) virgula

Depois entre no Acces e verá que mudou automaticamente.

 

vlu//