Somente Números em um TextBox

Código a baixo faz com que um TextBox só aceite números.

Private Sub TextBox1_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress

If Not (Char.IsDigit(e.KeyChar) OrElseChar.IsControl(e.KeyChar)) Then

e.Handled =

True

End If

End
Sub

Espero que gostem e at+!