Question

VB有两个RICHBOX控件，如何设置当第一个打了7个字的时候光标自动跳到第二个控件里面？

Answer 1

textchange时间
if a.text.length＝7 then b.setfocus

追问

Private Sub RichTextBox1_TextChanged(sender As Object, e As EventArgs) Handles RichTextBox1.TextChanged
if RichTextBox1.text.length＝7 then RichTextBox2.setfocus
End sub