Ma non te li scrive gia da tastiera? O magari ho capito male io

Comunque ti potrebbe interessare questo che serve per evitare l'inserimento di lettere nel textbox; in pratica si puo' inserire solo numeri:

Private Sub TuoTextBox_KeyPress(KeyAscii As Integer)
If InStr("0123456789", Chr$(KeyAscii)) = 0 Then KeyAscii = 0
End Sub