运行时vb如何在文本框获得焦点

1、打开VB软件，在窗体上面添加两个文本框，如下图所示。

2、分别设置两个文本框的属性，清空文本框的内容，如下图所示。

3、在窗体上，添加两个命令按钮，如下图所示。

4、分别设置两个文本框的属性，分别命名为“左”、“右”，如下图所示。

5、双击名称为“左”的命令按钮，编辑其代码，如下图所示。

6、双击名称为“右”的命令按钮，编辑其代码，如下图所示。

7、运行程序，点击命令按钮，观察文本框中的焦点变化，如下图所示。（为了方便观看，先点击“右”命令按钮，再点击“左”命令按钮）。

SetFocus 方法

将焦点移至指定的控件或窗体。

语法

object.SetFocus

object 所在处代表对象表达式，其值是“应用于”列表中的一个对象。

说明

对象必须是 Form 对象、MDIForm 对象或者能够接收焦点的控件。调用 SetFocus 方法以后，任何的用户输入将指向指定的窗体或控件。

焦点只能移到可视的窗体或控件。因为在窗体的 Load 事件完成前窗体或窗体上的控件是不可视的，所以如果不是在 Form_Load 事件过程完成之前首先使用 Show 方法显示窗体的话，是不能使用 SetFocus 方法将焦点移至正在自己的 Load 事件中加载的窗体的。

也不能把焦点移到 Enabled 属性被设置为 False 的窗体或控件。如果已在设计时将 Enabled 属性设置为 False，必须在使用 SetFocus 方法使其接收焦点前将 Enabled 属性设置为 True。

Deactivate事件在窗体失去焦点时引发。控件的GotFocus事件在控件获得焦点时引发，LostFocus事件在控件失去焦点时引发。在放在这些事件中写代码，不需要去判断。

非常简单。
假设文本框的名称为text1
则用代码 text1.SetFocus 即可。

text1.SetFocus