Ayuda con Ingreso de Moneda

eduardocab
28 de Marzo del 2005
Hola, necesito que me ayuden con lo aiguiente:
Estoy intentando colocar la cantidad de 8.75 colones en un txtbox para que me aparezca el camboi que tengo que dar, pero a la hora de darle clic en aceptar, me coloca 875,000
El Codigo que estoy colocando es el siguiente:

Private Sub txtCambio_Change()
puntO = InStr(txtCambio.Text, "#.##0")
If puntO = 0 Then encontrO = False Else encontrO = True
End Sub

Por favor si alguien puede ayudarme se lo agradeceré bastante, saludos