Question

如何动态调整RichTextbox中的文本大小以使其填满整个富文本框？任何帮助深表感谢。谢谢。

Answer 1

这篇MSDN文章几乎回答了你的问题。 http://msdn.microsoft.com/en-us/library/bb986765.aspx。您可以在那里下载附件。

Answer 2

我认为您可能必须使用'Font'构造函数获得创意。例如，在单击事件上，然后使用与您的应用程序（或文本框大小）的某种关系构造一个新的Font，并使用所需的字体大小。

Protected Sub btn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btn.Click
  Dim yourfontsize As Integer    

  'machinery to create desired font size
  If blah then 
      yourfontsize = X() 
  Else
      yourfontsize = Y()
  End If


  yourtextbox.SelectionFont = New Font("Tahoma", yourfontsize, FontStyle.Bold)

End Sub

其中X（）和Y（）是基于其他任何可能返回目标字体大小的函数在你的申请中继续。

参考：http://msdn.microsoft.com/en-us/library/yh8963yx.aspx

希望有所帮助！

-sf

动态调整字体大小以填充RichTextbox

2 个答案: