Validar campos texto y numèrico

Hola amigos,
Como puedo hacer para evitar que el usuario ingrese valores de tipo

en un campo de texto, donde sólo se debería ingresar datos de tipo

Lo estoy haciendo con este código, pero no me sale en el case else, me

un error indicàndome que el keychar es de tipo solo lectura.

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

Select Case Asc(e.KeyChar)

Case 8, 13, 48 To 57

Case Else

e.KeyChar = ""

End Select

End Sub

Saludos.
Miguel Valles.