TEXT获得焦点问题急呀

[knightknight]

我在COMMAND中的单击事件中写以下代码为何不对呀，请修改呀
IF（TEXT1。SETFOCUS（））THEN
MESSAGEBOX（“获得焦点”）
END IF

[knightknight]

为何没有人回答？

[felix]

Text1.SetFocus没有返回值

[demo001]

SetFocus是text控件的一个方法，不是属性也不是带有返回值的方法

不知道楼主想实现什么效果呢？

[minewdy]

command 在单击的时候已经获得焦点了，text 不可能获得，再说，SetFocus是text控件的一个方法,如何给你返回值

[goldstar3000]

这样最好！！
你哪样一辈子也行不通
Private Sub Command1_Click()
Text1.SetFocus
End Sub


Private Sub Text1_GotFocus()
MsgBox "得焦点"
End Sub

[xzp1030]

private sub command1_click()
msgbox "text1获得焦点"
text1.setfocus
sendkeys "{home}+{end}"
end sub

[lemonchen]

Private Sub Text1_GotFocus()
MsgBox "得焦点"
End Sub