十万火急！VB6.0中的RichTextBox文本如何设置出现滚动条！！！

Posted 2023-04-18

把它的ScrollBar属性设置为：
0：没有滚动条
1：横向滚动条
2：纵向滚动条
3：双向滚动条

别着急，继续看！

滚动条只有在真正需要的时候才显示出来，不会像TextBox一样显示为灰色
当MultiLine属性设置为True的时候，就会像Word一样自动换行，于是横向滚动条将不会显示
但是自动换行在RichTextBox里面是不能被禁用的，所以只能用单行来显示横向滚动条 参考技术A RightMargin
属性设为 10000（如果不够你可以设的更大一些）
这样就会有水平滚动条了 参考技术B 在属性里啊，Scrollbars设置

VB 如何把richtextbox中已经选中的部分文字，加粗、左对齐、居中、右对齐。不胜感激！！！

要求 加粗点一下加粗再点一下取消加粗，而且只对当前richtextbox显示的数据库中内容有效，对其余的记录没有作用
我用RichTextBox1.Font.Bold = Not RichTextBox1.Font.Bold 后，在richtextbox中的记录有的改了有的没改，不知是何原因

参考技术A 控件名a
a.SelBold = Not a.SelBold '粗体
a.SelStrikeThru = Not a.SelStrikeThru ‘删除线
a.SelItalic = Not a.SelItalic ’斜体
a.SelUnderline = Not a.SelUnderline ‘下划线追问

改了以后，数据库中的相应记录变成如下代码了"\rtf1\ansi\ansicpg936\deff0\fonttbl\f0\fnil\fcharset134 \'cb\'ce\'cc\'e5;
\viewkind4\uc1\pard\lang2052\f0\fs20\'b5\'da\'d2\'bb\'d5\'c2\'d1\'a1\'d4\'f1\'bc\'f2\'b5\'a51
\par
" 怎么回事啊

追答

你加了粗体了，当然有改变了，没改变会变粗么？

本回答被提问者采纳 参考技术B 回答里没有对齐方式，做补充：
RichTextBox1.SelAlignment = rtfLeft ' （缺省）左边。段落沿左边距对齐。
RichTextBox1.SelAlignment = rtfRight '段落沿右边距对齐。
RichTextBox1.SelAlignment = rtfCenter '段落居中对齐。