在RichTextBox中调整字体大小会导致＆＃34;对非共享成员的引用需要一个对象引用＆＃34;

Question

我正在尝试在RichTextBox中为ActiveReports 7报告重新调整字体大小。下面的代码成功选择了RichTextBox中的文本，但是当我在为所选文本分配新字体的行上放置断点并将鼠标悬停在SelectionFont上时，它说：“{Name = reference to a non共享成员需要一个对象引用.Size = 10.0}。“如果我跳过断点，下一行代码（无论它是什么）将给出一个空引用异常。如果我注释掉这些重新调整大小的行，那么报告运行得很好。我在这里做错了什么，如何解决这个问题，以便我的字体可以重新调整大小？

代码：

Dim out As String = rdr.Item("Directions").ToString().Replace("<br />", "").Replace("    <br>", "").Replace(Environment.NewLine, "<br />").Replace("text-indent: 0px;", "").Replace("  <p>", "<br />").Replace("</p>", "")
RichTextBox1.Html = out

RichTextBox1.SelectionStart = 0  
RichTextBox1.SelectionLength = RichTextBox1.Text.Length  
RichTextBox1.SelectionFont = New System.Drawing.Font("Arial", 9)