Question

vb中，text1的selstart为什么不能写在按钮单击上呢？

我要实现的功能为：
当单击按钮的时候文本框内的文本从第一个开始选择5位。

下面的这串代码不能实现：
Private Sub Command2_Click()
Text1.SelStart = 0
Text1.SelLength = 5
End Sub

而这串却能实现：
Private Sub text1_Click()
Text1.SelStart = 0
Text1.SelLength = 5
End Sub

谁能告诉我其中的原因吗？

Answer 1

Private Sub Command2_Click()
Text1.SelStart = 0
Text1.SelLength = 5
End Sub
主要是在这段代码中text没有得到焦点不是活动控件。就不能确发事件。

如果加上一个让text得到焦点的事件，那就可以得到你想要的效果了。

在前面加上一条代码：Text1.SetFocus'让TEXT得到焦点。

Answer 2

按钮代码改成这样:
Private Sub Command2_Click()
text1.SetFocus
Text1.SelStart = 0
Text1.SelLength = 5
End Sub

还可以这样:
把Text1的HideSelection属性设为假.就不用改代码