Visual Basic - control de inserción-URGENTE

HOLA!

TENGO UN FORMULARIO CON VARIOS CAMPOS REFERIDOS A UNA BASE DE DATOS Y QUIERO QUE EN SEGUN QUE CAMPOS EL USUARIO SOLO PUEDA INTRODUCIR NUMEROS.
lo he intentado cambiando el formato de la caja de texto, pero le deja escribir letras igualmente.

como lo hago?

gracias!

sub text_keypress(...........)
if keyascii<48 or keyascii>57 then
keyascii=0
endif
...