在所选文本之前和之后添加文本 - VBA用户表单

Question

我使用VBA用户表单，以便使用InkEdit控件中的富文本格式文本框编辑某些文本。 当用户点击用户表单上的命令按钮时，我试图在特定位置插入html标记。

例如，如果用户点击＆＃34; strong＆＃34;按钮执行以下代码，文本插入文本框内的光标位置：

InkEdit1.SelText = "<strong>"

我有另一个关闭法规的按钮：

InkEdit1.SelText = "</strong>"

我试图找到一种方法，即开场陈述和结束陈述将一起应用。当用户从文本框中选择一个文本并单击按钮然后＆＃34; strong＆＃34;将在选择之前插入＆＃34; / strong＆＃34;将在选择后插入：

Answer 1

这是否有效：

moment

如果您真的想要获得幻想，可以只重新选择原始文本：

InkEdit1.SelText = "<strong>" & InkEdit1.SelText & "</strong>"

Protip：确保“HideSelection”属性设置为“False”

如果您没有使用实际的RitchTextBox，请尝试以下方法：Toos＆gt;其他控件＆gt;检查Microsoft Rich Textbox