como valido numero y el punto en un textBox

[celex]

buenas tardes, tengo una duda de validar numeros con el punto y que no me permita capturar letras o signos, el punto en acii es el 250 y este es mi codigo:

Código PHP:

  Private Sub Text1_KeyPress(KeyAscii As Integer) 
GCaracter = Chr(KeyAscii) 
MsgBox GCaracter 
If Not (GCaracter = Chr(8) Or GCaracter = Chr(13)) Then 
    If GCaracter < Chr(48) Or GCaracter > Chr(57) Then 
        KeyAscii = 0 
        Beep 
    End If 
End If 
End Sub  
   

gracias