1,451
社区成员
发帖
与我相关
我的任务
分享问两个关于文本框的问题。在线等待。
1，如何设定文本框中不同的文字为不同的颜色？
2，在加了滚动条的文本框中，如何让文本自动滚动到最后一行？
谢谢。
2，在加了滚动条的文本框中，如何让文本自动滚动到最后一行？
谢谢。
...全文
请发表友善的回复…
发表回复
northwolves 2003-09-25
- 打赏
- 举报
1.richtextbox or picture
2.
Private Sub Command1_Click()
Text1.SetFocus
Text1.SelStart = Len(Text1.Text) '至行尾
SendKeys "{home}" '至行头
End Sub
2.
Private Sub Command1_Click()
Text1.SetFocus
Text1.SelStart = Len(Text1.Text) '至行尾
SendKeys "{home}" '至行头
End Sub
buffaloes 2003-09-25
- 打赏
- 举报
cuizm(射天狼)的 方法是楼主要的结果！
yijiansong 2003-09-25
- 打赏
- 举报
UP
didishu0807 2003-09-25
- 打赏
- 举报
cuizm(射天狼)的Text1.SelStart = Len(Text1.Text)是将Text1.text中的所有内容都选中，而不是楼主要的结果
射天狼 2003-09-25
- 打赏
- 举报
1.文本框实现不了,换别的控件吧
2.Text1.SelStart = Len(Text1.Text)
2.Text1.SelStart = Len(Text1.Text)
watt 2003-09-25
- 打赏
- 举报
文字为不同的颜色在文本框中实现不了，除非RichTextBox
