Keep focus on one text box

[4SaKeN]

hi there

Im looking to keep focus in my first text box even after i have selected on different options.

basically i have 10 command buttons giving different info into the txtNamebox.Text

Private Sub cmdIcon_click(Index As Integer)
 
    Select Case Index
        Case 0
            txtNamebox.Text = txtNamebox.Text + Format$("1")
        Case 1
            txtNamebox.Text = txtNamebox.Text + Format$("2")

But after selecting one of them command buttons , i have to manually select the first text box again to type into.
.Please help/


I have the first text box as tab index 0 and the rest disabled but that doesnt work