Visual Basic.NET - Ayuda Urgente

Hola amigos de la web del programador necesito que alguien me ayude:

estoy programando en visual basic.net 2003 y necesito validar cajas de texto que unicamente acepten numeros como puedo hacerlo si es posible envien una respuesta a este correo: [email protected]

desde ya gracias...

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
Select Case e.KeyChar
Case Chr(8), Chr(Asc("0")) To Chr(Asc("9"))

Case Else
e.KeyChar = Chr(0)
End Select

End Sub