Problema de numeros

[belnels]

Buenas forero, vuelvo a ser yo... poco a poco he ido solucionando los problemas... Tengo 10 textbox * 3

cantidad * precio = total

para que se generara la multiplicacion cree un boton y todo bien.
para el iva necesitaba que se cargara automatico pero igual con un boton, bien.
total, cree un boton, bien.

Mi problema es el siguien: los 10 textbox solo me aceptan numero sin coma ni letra ni punto.

Como hago para que el precio, subtotal, total, iva, monto a pagar me acepten . y ,
Ejemplo: 4.119,05

El codigo que use fue:

Private Sub txtSubtotal_KeyPress(KeyAscii As Integer)
'Hace que la caja de texto solo acepte números.
If Not (KeyAscii >= 48 And KeyAscii <= 57 Or KeyAscii = 8) Then
KeyAscii = 0
End If
End Sub

AGRADEZCO SU AYUDA.