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

Posted 2023-04-01

要求 加粗点一下加粗再点一下取消加粗，而且只对当前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 '段落居中对齐。

VB。如何把 TEXT 文本框中选中的字体 变成想要的颜色

参考技术A 如何把
TEXT
文本框中选中的字体
变成想要的颜色
尽量要用到：SELTEXT,COMMONDIALOG,FORCOLOR。有其他方法也可以。
满意答案┢┦aΡpy纯7级2008-10-10文本框只能设置全部字体的颜色，无法单独改变部分字体的颜色，改用RichTextBox吧！方法如下：右击工具箱选“部件”，然后选中“Microsoft
Rich
TextBox
Control6.0”，在窗体上画一个RichTextBox控件，然后在代码中通过SelColor属性就可以改变选中的字体的颜色。