以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]文本框滚动条如何一直保持在最下部 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=172396) |
-- 作者:zpsun2003 -- 发布时间:2021/10/11 9:20:00 -- [求助]文本框滚动条如何一直保持在最下部 文本框内内容比较多,如何让滚动条一直保持在最下部,我设置了初始光标位置为:CaretAtEnd,但不管用呢 |
-- 作者:有点蓝 -- 发布时间:2021/10/11 9:27:00 -- 窗口afterload事件 Dim txt As WinForm.TextBox = e.Form.Controls("TextBox1") Dim d = txt.BaseControl d.HideSelection = False 文本框滚动到底部 Dim t As WinForm.TextBox = e.Form.Controls("TextBox1") Dim d = t.BaseControl t.SelectionStart = t.Text.Length d.ScrollToCaret
|
-- 作者:zpsun2003 -- 发布时间:2021/10/11 10:03:00 -- 可以了,谢谢 |