den Focus auf die Textbos zu setzen erreichst Du mit "Text1.SetFocus".

Dass in der Textbox nur Zahlen zugelassen sind würde ich von vornherein festlegen:

Private Sub Text1_KeyPress(KeyAscii As Integer)
     Select Case KeyAscii
        Case 8, 44, 48 To 57
            Case Else
                KeyAscii = 0
    End Select
End Sub

Dabei steht die 8 für die Rückschritttaste, die 44 für das Komma und 48 bis 57 für die Zahlen 0 bis 9. Die Tabelle findest Du auch in der MSDN-Hilfe unter dem Stichwort ASCII-Zeichensatz, so dass Du noch andere Zeichen zulassen kannst - oder auch nicht.

cu
Moni