13518219792
方法和详细的操作步骤如下：
渭城ssl适用于网站、小程序/APP、API接口等需要进行数据传输应用场景，ssl证书未来市场广阔！成为成都创新互联的ssl证书销售渠道，可以享受市场价格4-6折优惠！如果有意向欢迎电话联系或者加微信：028-86922220（备注：SSL证书合作）期待与您的合作！
1、第一步，打开VB软件，然后在表单上添加两个文本框，见下图，转到下面的步骤。
2、第二步，完成上述步骤后，分别设置两个文本框的属性，然后清除文本框的内容，见下图，转到下面的步骤。
3、第三步，完成上述步骤后，添加两个命令按钮，见下图，转到下面的步骤。
4、第四步，完成上述步骤后，分别设置两个文本框的属性，并分别命名为“左”和“右”，见下图，转到下面的步骤。
5、第五步，完成上述步骤后，双击名为“左”的命令按钮以编辑其代码，见下图，转到下面的步骤。
6、第六步，完成上述步骤后，双击名为“右”的命令按钮以编辑其代码，见下图，转到下面的步骤。
7、第七步，完成上述步骤后，运行程序，单击命令按钮，然后在文本框中观察焦点变化，见下图。这样，就解决了这个问题了。
方法如下：
1、打开例1.1创建的工程。
2、选择窗体Form1并双击该窗体，出现窗体的调事件的过程代码体。
3、在窗体调用的过程代码体中编制如下过程代码：
Private Sub Form_Load()
Form1.Width = 4860
Form1.Height = 2520
End Sub
4、设置窗体Form1的SartUpPosition属性为2-屏幕中心，这样运行窗体可以发现，屏幕的大小与例1.6中通过属性设置的大小是一致的。
最正统的方法是把textbox1的tabindex属性设为0（其他控件的tabindex不能是0）
要在load事件里用textbox1.focus()也可以，但要先me.show()，否则不会起作用。因为控件得到焦点需要控件”可见可用“，在formload阶段整个窗体是“不可见"的，需要强制使用me.show()。
在form_load事件中，加入：
Button5.Focus()
这样焦点就在Button5上了
Public
Class
Form3
按下,显示控件,并获得焦点.
Private
Sub
Button1_Click(ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles
Button1.Click
TextBox1.Visible
=
True
TextBox1.Focus()
End
Sub
判断是否获得焦点.
Private
Sub
Button2_Click(ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles
Button2.Click
If
TextBox1.Focused
=
True
Then
MessageBox.Show("已经获得焦点了.")
Else
MessageBox.Show("已经失去焦点了.")
End
If
End
Sub
失去焦点后自动陷藏.
Private
Sub
TextBox1_LostFocus(ByVal
sender
As
Object,
ByVal
e
As
System.EventArgs)
Handles
TextBox1.LostFocus
TextBox1.Visible
=
False
End
Sub
End
Class
最正统的方法是把TextBox1的TabIndex属性设为0（其他控件的TabIndex不能是0）
要在Load事件里用TextBox1.Focus()也可以，但要先Me.Show()，否则不会起作用。因为控件得到焦点需要控件”可见可用“，在FormLoad阶段整个窗体是“不可见"的，需要强制使用Me.Show()。
