Visual Basic - Decimales. usar (.) y no la (,)

En la carga de nº mi problema es que cuando cargo los decimales quiero usar el punto que esta a la derecha con los nº y no la coma.
Cuando ingreso los decimales y pongo el punto me toma como entero directamente. Pero no quiero cambiar la configuracion de la maquina.
Muchas gracias.

Si no quieres cambiar la configuración de la máquina entonces cambiale el formato al número, es decir lo ingresas con punto pero por código lo cambias a coma. T e envión un pequeño código ojala te sirva

Private Sub Command1_Click()
Text1.Text = strtran(Text1.Text)
End Sub

Function strtran(dato As String) As Double
Dim xx As String, ii As Integer, ij As Integer

xx = Trim(CStr(dato))
ii = InStr(1, xx, \".\")
If ii = 0 Then
\'ok
strtran = CDbl(dato)
Else
\'arreglar
If ii = 1 Then
strtran = CDbl(Mid(xx, ii + 1, 2))
Else
strtran = CDbl(Mid(xx, 1, ii - 1) & \",\" & Mid(xx, ii + 1, 3))
End If
End If
End Function

Esta es una forma rápida de evitar que introduzcan la coma en una casilla numérica
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = Asc(",") Then KeyAscii = Asc(".")
End Sub

gracias a los 2.