コントロール名.Select()
コントロール名.Focus()
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _ Handles Button1.Click Me.TextBox1.Select() End Sub
TextBox1.Focus()