Visual Basic - Introducir decimales

Vereis tengo que solucionar un pequeño problema y no se como resolverlo os estaria muy agradecida si me podeis ayudar.
En un campo de mi aplicación (TextBox) debo introducir una cantidad con decimales, lo que quiero es que al introducir dicha cantidad la persona que utiliza mi aplicación pueda introducir independientemente el Punto (.) ó la coma (,) para indicar la separación decimal y no verse obligado a introducir la coma como me ocurre en estos momentos.
Os estare muy agradecida si me podeis ayudar.

En el formulario declara:

Dim DecimalPoint As Boolean

'Para cada Text box númerico:
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)

DecimalPoint = (KeyCode = vbKeyDecimal)

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

If DecimalPoint Then
KeyAscii = Asc(Mid(Format(0, "0.0"), 2))
End If

End Sub