Visual Basic - ayuda

necesitaria que alguien me mande si tiene una rutina que no permita ingresar mas de una coma en una caja de texto, por favor que la necesito y no tengo ni idea de como se hace, o que me eplique como hacerla, gracias

Pues en el evento keypress haces:

If instr(texto.text, ",") <> 0 and keyascii = asc(",") then keyascii = 0

Espero que te funcione, suerte