13518219792
最正统的方法是把TextBox1的TabIndex属性设为0（其他控件的TabIndex不能是0）
为莲都等地区用户提供了全套网页设计制作服务，及莲都网站建设行业解决方案。主营业务为网站制作、网站设计、莲都网站设计，以传统方式定制建设网站，并提供域名空间备案等一条龙服务，秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求，就会得到认可，从而选择与我们长期合作。这样，我们也可以走得更远！
要在Load事件里用TextBox1.Focus()也可以，但要先Me.Show()，否则不会起作用。因为控件得到焦点需要控件”可见可用“，在FormLoad阶段整个窗体是“不可见"的，需要强制使用Me.Show()。
方法和详细的操作步骤如下：
1、第一步，打开VB软件，然后在表单上添加两个文本框，见下图，转到下面的步骤。
2、第二步，完成上述步骤后，分别设置两个文本框的属性，然后清除文本框的内容，见下图，转到下面的步骤。
3、第三步，完成上述步骤后，添加两个命令按钮，见下图，转到下面的步骤。
4、第四步，完成上述步骤后，分别设置两个文本框的属性，并分别命名为“左”和“右”，见下图，转到下面的步骤。
5、第五步，完成上述步骤后，双击名为“左”的命令按钮以编辑其代码，见下图，转到下面的步骤。
6、第六步，完成上述步骤后，双击名为“右”的命令按钮以编辑其代码，见下图，转到下面的步骤。
7、第七步，完成上述步骤后，运行程序，单击命令按钮，然后在文本框中观察焦点变化，见下图。这样，就解决了这个问题了。
一个时刻只有一个窗体能获得焦点。关键是窗体收到
WM_KILLFOCUS
消息时的重绘。如果你只是想让窗体看起来并没有什么不同，就这样吧。我用
VB6，所以写的都是
API，VB.NET
的库不是很熟，所以……将就一下吧。
调用
SetWindowLong，使窗体的消息处理链接到新的窗口函数
NewWndProc，然后在
NewWndProc
里检测到
WM_KILLFOCUS
时就将其移出消息队列即可。完毕之后调用原来的窗口函数。
SetFocus 方法
将焦点移至指定的控件或窗体。
1.对象必须是 Form 对象、MDIForm 对象或者能够接收焦点的控件。调用 SetFocus 方法以后，任何的用户输入将指向指定的窗体或控件。
2.焦点只能移到可视的窗体或控件。因为在窗体的 Load 事件完成前窗体或窗体上的控件是不可视的，所以如果不是在 Form_Load 事件过程完成之前首先使用 Show 方法显示窗体的话，是不能使用 SetFocus 方法将焦点移至正在自己的 Load 事件中加载的窗体的。
3.也不能把焦点移到 Enabled 属性被设置为 False 的窗体或控件。如果已在设计时将 Enabled 属性设置为 False，必须在使用 SetFocus 方法使其接收焦点前将 Enabled 属性设置为 True。
