title: Is there a limit to the size for a richtextbox in ms access?
body: <p>I'm using a richtext box to concatenate a log message.</p>
  
  <p>And it seems I got an error: "the settings of this property is too long"</p>
  
  <p>So is there a size limit ?</p>
  
  <p>My code is very simple: I call multiple times: </p>
  
  <pre><code> Public Function showMessage(MyTxtBox As String, ByVal message As String)
  
      Dim frm As Form
     On Error GoTo showMessage_Error
  
      Set frm = Forms.Item("FrmMessage")
      frm(MyTxtBox).Parent.SetFocus
      frm(MyTxtBox).Text = frm(MyTxtBox).Text &amp; message &amp; Chr(13) &amp; Chr(10)
  
     On Error GoTo 0
     Exit Function
  
  showMessage_Error:
  
      'MsgBox "Error " &amp; Err.Number &amp; " (" &amp; Err.Description &amp; ") in procedure showMessage"
      frm(MyTxtBox).Text = ""
      Resume Next
  
  End Function 
  </code></pre>
  
  <p>I use MS Access` TextBox selecting RichTextBox option;</p>
  
  <p>As you can see I have partially solved the problem by using </p>
  
  <pre><code>frm(MyTxtBox).Text = ""
  Resume Next
  </code></pre>
  
  <p>when an error occurs but that means I will lose all previous messages.</p>
  
  <p>Isn't this incredible ?</p>
  
  <p>Update: The form should not close by itself as It must be visible all the time as log message is appended to the form several times during a long processing task (importing several files in my case).</p>