我有一个Access数据库,用户在其中将信息粘贴到带有RTF的文本框中。然后,此文本框中的信息将添加到另一种窗体中,该窗体将编译跨用户粘贴的所有不同文本。我希望能够将Font的格式设置为Arial大小10 AfterUpdate,以便在将所有这些记录编译在一起的主窗体中保持一致。用户将粘贴来自许多不同来源的文本,我不能指望用户自己格式化文本。我希望能够通过编程将所有文本自动更改为Arial大小10,以实现一致性。
我已经尝试通过VBA使用一些基本代码来实现所需的结果,并且当文本框设置为“纯文本”时,该代码可以正常工作,但是该项目要求文本框为富文本格式。
Private Sub Textbox1_AfterUpdate()
Me.Textbox1.FontName = "Arial"
Me.Textbox1.FontSize = 10
End Sub
这似乎可以与纯文本一起正常使用,但是我不确定是否缺少与Rich Text相关的语法等,或者甚至可以用这种方式格式化Rich Text。