Visual Basic - Validar Decimales en un TextBox. Help

Mi problema es el siguiente, tengo un textbox donde voy a introducir una cantidad en moneda, o sea, dicho textbox no puede contener otro caracter que no sea numero, pero tambien quiero introducir decimales (2 decimales)

Mi codigo de validacion es:

Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then
KeyAscii = 0 'Cancela el caracter
Beep 'Sonido de aviso de error
End If
End Sub

De esta forma solo puedo introducir numeros, pero si permito que ademas de numeros me deje introducir la coma o el punto para asi poder poner decimales entonces no validad la posicion del punto o cuantos puntos puedo poner, y el operador podria introducir valores como estos:

1200,234
,6788
34,767,,899
989,12,234,221,

Tendria que haber una forma de validar dicha coma a que solo se pueda introducir una vez y que este en el lugar correcto.

ALGUIEN SABE COMO HACER ESTO???

la función VAL te devuelve el valor de lo introducido en un textbox y te permite introducir el punto si introduces una letra el valor devuleto es cero

otra forma sería

if instr(1,text1,".")<>0 then exit sub
If KeyAscii < Asc("0") Or KeyAscii > Asc("9") or keyascii<>"." Then
KeyAscii = 0 'Cancela el caracter
Beep 'Sonido de aviso de error
End If

Tengo un control armado para eso, si quieres te lo envio.