如何給VB.Net中的RichTextBox控件添加填充？

我正在開發vb.net中的windows應用程序。在這個窗體中我有一個RichTextBox控件。現在我想在richtextbox中填充一些內容。所以我的文本將在像word文檔之類的空格（填充）之後開始。如何給VB.Net中的RichTextBox控件添加填充？

Text start from inner square.

所以任何一個可以給一些想法如何給填充到RichTextBox控件？

在此先感謝。

來源

2012-09-21 Brijesh Patel

沒有允許填充的內置屬性。您可以創建自己的控制並自己處理繪畫（或找到其他人 - http://www.codeproject.com/Articles/21437/A-Padded-Rich-Text-Box-Subclass）;但是您可以通過將面板中的RichTextBox對接來輕鬆實現所需的外觀。

面板確實有Padding屬性。

如果使用相同的BackColor，它可能會產生所需的效果。雖然滾動條可能看起來「關閉」;如果你需要它滾動的東西會變得更復雜 - 我認爲你可以使用VScrollBar - 與Panel的高度相同，但管理滾動會變得複雜。你想停止RichTextBox顯示它的滾動條;但您需要使用VScrollBar來管理滾動。

如果沒有提供更好的解決方案;今晚我會試試看，看看我能否得到它的工作:)

來源

2012-09-21 11:53:36

感謝@Rob爲您的快速回復。我在代碼中做了你所說的。但是當richtextbox中有滾動條時，它將在richtextbox控件的面板中出現。我不想要。我只想在面板中滾動條。如果用戶在該滾動條上下滾動，則滾動將在richtextbox中執行。 –

我也檢查代碼項目代碼。在那裏我有一個問題，如何增加填充？意味着我需要更多的填充，然後從哪裏設置它？ –

哦，謝謝@Rob。我嘗試了所有的方法來做到這一點。但我不能。我真的放棄了這個問題。我的要求非常重要。所以我不知道該怎麼辦... –

我有一個類似的問題，這對我的工作和左邊緣至少。基本上我選擇了所有的文本並設置縮進。

With RTB  'This changes the left margin for the whole thing 
    Dim OldSelStart As Integer = .SelectionStart 
    Dim OldSelLen As Integer = .SelectionLength 
    .SelectionStart = 0 
    .SelectionLength = Len(.Text) 
    .SelectionIndent = 10 
    .SelectionStart = OldSelStart 
    .SelectionLength = OldSelLen 
End With

來源

2015-05-20 06:34:58

如何給VB.Net中的RichTextBox控件添加填充？

回答

相關問題