Visual Basic - Textbox que solo se puedan escribir numeros

Hola a todos, tengo un problemilla, a ver si alguien me puede echar un cable cillo. Como puedo hacer para que un textbox no se puedan escribir letras, unicamentes numeros. Gracias anticipadas

una manera es poniendo esto en el evento keyPress

If Not IsNumeric(Chr(KeyAscii)) Then KeyAscii = 0

la solucion anterior es muy ingeniosa, sin embargo solo funciona con numeros enteros, para decimales prueba esto :

Private Sub Text1_Change()
If IsNumeric(Me.Text1.Text) = False Then
If Trim$(Me.Text1.Text) <> vbNullString Then
Me.Text1.Text = vbNullString
End If
End If
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii <> vbKeyBack And (KeyAscii < vbKey0 Or KeyAscii > vbKey9) Then
If KeyAscii = vbKeyDelete Then
If InStr(1, Me.Text1.Text, \".\") > 0 And Me.Text1.SelLength <> Len(Me.Text1.Text) Then
KeyAscii = 0
End If
Else
KeyAscii = 0
End If
End If

End Sub

tanto codigo, tanto enredarse..tan solo para esto...en el evento validate colok lo siguiente

if not isnumeric(text1.text) then
text1.text=""
msgbox "Se aceptan solo numeros"
end if...

Comienza con eso a ver...

m0rph