ci sono le api di windows che ti permettono di inserire ad esempio in una text solo valori numeri.
non ti sembra eccessivo utilizzare le API per una cosa così banale?

Guarda qui:

codice:
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If Not IsNumeric(Chr(KeyAscii)) Then KeyAscii = 0
End Sub