Visual Basic - limitar caracteres en textbox

Buenas, tengo un problema y me gustaria que me pudiesen ayudar.
Estoy haciendo una aplicacion y en los textbox que hay deseo limitar las entradas de datos.
ejemplo:
En un textbox que se introduce un precio(1254,54 €) me gustaria limitarlo para que solo se puedan introducir cantidades(10,25 €)(100,55 €) etc... o sea que si introduzco por error algun caracter o letra bien al final o delante como por en mediio que no me de error.
Gracias.

En el evento KeyPress le pones el siguiente código:
Dim car As String * 1
car = Chr(KeyAscii)
If InStr("0123456789.," & Chr(8) & Chr(13), car) = 0 Then
KeyAscii = 0
Exit Sub
End If
---------
Saludos

Hola Avellaneda. Gracias por tu respuesta.
He probado lo que me has mandado pero sigue sin funcionar como yo quiero, puesto que sigo pudiendo insertar "comas" y "puntos" y yo lo que quiero es que se pueda insertar solo una coma.
Saludos

Pues en la búsqueda de la cadena le quitas el punto:
If InStr("0123456789," & Chr(8) & Chr(13), car) = 0 Then
Saludos

Disculpa Avellaneda, pero no se si me entiendes.
lo que quiero es que solo se pueda insertar una sola coma y con este codigo vale que no puedo insertar otros caracteres pero si me deja insertar varias comas y lo que pretendo es que si hay algun error al presionar 2 o mas veces la tecla "," que no me deje insertar mas de una coma
Saludos.

Una solución:
Declaración a nivel de módulo:
Private YaDecimal As Boolean
En el evento GotFocus():
YaDecimal = False
En el evento KeyPress()
If KeyAscii = 44 Then
If YaDecimal = True Then
KeyAscii = 0
Exit Sub
Else
YaDecimal = True
End If
End If
*- Espero que así te sirva
Saludos

Mil gracias, amigo. Ahora si funciona.

Saludos.

el problema de este codigo, es que una vez has introducido una coma, ya no puedes volver a introducir otra. Es decir, si tu borraras el numero porque te has equivocado, el booleano global ya ha cambiado y no podrias meter ninguna coma en el nuevo numero.
Esto es justo lo que estoy buscando jeje

venga un saludo

Con un poco de imaginación, en el evento KeyDown puedes controlarlo para que el booleano vuelva a ser false.
Saludos

Creo que la respuesta a esta pregunta es muy rebuscada...
Tienes que buscar siempre una o más soluciones y de ahí elegir la mejor, cuando algo se torna complicado significa que has elegido el camino incorrecto, ya que recuerda, en lo que a informática se refiere ya está casi todo hecho.

Un consejo en buena.