离开文本框代码:
Dim s As String = e.Sender.SelectionStart & "|" & e.Sender.SelectionLengthe.Sender.BaseControl.tag = s
按钮:msgbox(txt.BaseControl.tag)
出现问题:只记录第一次离开的信息。