如何设置使RichTextBox中内容超出其大小时自动显示最下面的内容?

发布网友 发布时间:20小时前

我来回答

1个回答

热心网友 时间:1分钟前

Private Sub Form_Load()
RichTextBox1.Text = "1、作品要弘扬时代主旋律,反映地域风物民情,讴歌家乡的巨大变化,赞颂身边的好人好事,阐述自己内心的所思所想。" & _
"2、作品思想健康向上,贴近社会生活,时代气息浓郁,中心思想明确,立意新颖独特,方法灵活多样,字迹工整,格式正确,无错字病句,达到思想性和艺术性完美统一。" & _
"3、作品体裁以新诗、散文、小说、旧体诗词为主,学生习作不在征集范围之内。学生作品要在教师或者文学爱好者的指导和把关后报送。" & _
"4、作品标题下面注明作者姓名?所在学校?年班及指导教师?" & _
"5、如果参赛作品是已经在报刊杂志发表,或在市级以上大赛中获奖的,要在作品的下面注明时间、刊物或大赛名称。__张志晨转"
Dim i As Integer
i = Len(RichTextBox1.Text)
RichTextBox1.SelStart = i

End Sub
http://hi.baidu.com/xlzzc/blog/item/ee1e3c45a3626a50510ffe82.html

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com