以下代码如果放在控件的click事件中,可以达到效果。
Dim tx As WinForm.TextBox= e.Form.Controls("TextBox1")
tx.SelectionStart = 3
tx.SelectionLength = 2
问题:
1、上述代码如果在写到旁边的按钮事件里为何无效?
2、想通过键盘左右方向键控制光标,为何以下代码无效(文本框KeyDown事件)?
Dim n As Integer
n= e.Sender.Text.IndexOf("-")
Select Case e.KeyCode
Case Keys.right
If e.Sender.SelectionStart = 3 Then
e.Sender.SelectionStart = 6
e.Sender.SelectionLength = 2
ElseIf e.Sender.SelectionStart = 6 Then
e.Sender.SelectionStart = 9
e.Sender.SelectionLength = 2
endif
end select