Visual Basic - Que acepte y que no un texbox?

Aguien sabe como le digo a una caja de texto que aceptar y que no (formato)?

Por ejemplo:
si tengo una caja de texto que solo quiero que acepte los numeros del 1 al 6. Como le hago para que si yo presiono el 7 no lo escriba en la caja de texto sin tener que ponerle un mesaje en el evento change que diga: solo # del 1 al 6. Es decir no importa que presione sobre la caja de texto que solo escriba si lo que se presiono es un # entre el 1 y 6.
Gracias.

La respuesta completa la puse en el foro de Visual Basic, este es el código
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Not IsNumeric(Chr(KeyAscii)) Then
KeyAscii = 0
Else
MsgBox Chr(KeyAscii)
If Val(Chr(KeyAscii)) > 6 Then
KeyAscii = 0
End If
End If

End Sub

Por lo q dices parece q con el evento Keypress del textbox tendrias suficiente no? a cada tecla q pulses, mira si esta en el rango q kieres....