Foxtable(狐表)用户栏目专家坐堂 → [求助]文本框运行事件代码后,使光标在文本最后


  共有1458人关注过本帖平板打印复制链接

主题:[求助]文本框运行事件代码后,使光标在文本最后

帅哥哟,离线,有人找我吗?
jyh7081
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:957 积分:8434 威望:0 精华:0 注册:2012/10/3 13:25:00
[求助]文本框运行事件代码后,使光标在文本最后  发帖心情 Post By:2017/10/15 17:42:00 [只看该作者]

我在textbook的TextChanged事件设置了排版代码,怎样在控件文本变动后,光标焦点在文字的最后;

现在的情况是点击回车键,光标到了首行首字符;

 

Dim txt As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim ary() As String = txt.Text.Split(chr(13))
Dim str As String = ""
For Each s As String In ary
    If s <> chr(10) Then
        str &= "    " & s.trim & vbcrlf '行首空格
        str &= vbcrlf & ""
    End If
Next
txt.text = str


 回到顶部