para gravar use replace então...
...
!campo = Replace(Label, ",", ".")
...
Assim ele substitui a vírgula por ponto...
Essa é uma solução, vc tb pode ver se as suas configurações regionais estão para português (Brasil)...
bom veja se com isso vc consegue solucionar o seu problema
qq coisa é só postar novamente
t+