Visual Basic - Ayuda por favor -VB-

Nesecito validar campos.
En unos necesito escribir sólo números, en caso de digitar letras que despliegue un mensaje que diga: "Sólo puede ingresar números".

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < 48 Or KeyAscii > 57 Then
KeyAscii = 0
MsgBox "loquesea"
End If

End Sub