VB SetFocus 怎么用？

SetFocus意思是：设置焦点。

用法说明如下，例如：

Private Sub Command1_Click()

Text2.Text = Text1.Text

End Sub

运行完，焦点会停留在command1按钮上。

但是改为：

Private Sub Command1_Click()

Text2.Text = Text1.Text

Text1.SetFocus

End Sub

运行后，焦点就在text 1 上了。

这就是SetFocus的用法。

扩展资料：

setfocus与getfocus的不同：

setfocus指属性；而getfocus指事件。

例子：

private sub command1_click()

if(text5.text=text6.text) then

text7.setfocus

end if

end sub

private sub text7_getfocus()

text7.text=""

end sub

控件名+".SetFocus"
比如：
Private Sub Command1_Click()
Text2.Text = Text1.Text
End Sub
运行完，焦点会停留在command1按钮上，
但是改为：
Private Sub Command1_Click()
Text2.Text = Text1.Text
Text1.SetFocus
End Sub
运行后，焦点就在text 1 上了。
这就是SetFocus的用法。

对象名.SetFocus 如：Text1.SetFocus
要确保对象可以拥有焦点。另外不要在Form_Load事件中使用SetFocus，因为这时候窗体及其控件还没有显示出来，会出错的。

控件名.SetFocus
这样就行了