向vb文本框添加文本问题?

feng_8103 2003-11-12 11:03:08
用程序的方法向vb文本框内添加内容,但添加了一次内容后,要想再添加内容的话,只有用覆盖的方法将文本框内的内容与新的内容合并后再赋值给文本框,虽然这样可以完成添加内容的目的,但是文本框不会自动将光标停留在最新添加的文本哪儿,只是永远在第一行,不像手动在文本框内添加内容那样光标随着输入的文本移动。
...全文
209 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
northwolves 2003-11-12
  • 打赏
  • 举报
回复
Private Sub Command1_Click()

Text1.Text = Text1.Text & " abcd"
Text1.SetFocus
Text1.SelStart = Len(Text1)
End Sub

Private Sub Form_Load()
Text1 = "abcd"
End Sub
射天狼 2003-11-12
  • 打赏
  • 举报
回复
Text1.SelStart = Len(Text1.Text)
Text1.SetFocus
victorycyz 2003-11-12
  • 打赏
  • 举报
回复
text1.selstart=len(text1)

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧