如何使豐富的文本框自動調整

我想調整一個富文本框以適應其中的字符，而不需要滾動它....我刪除了富文本框的滾動條屬性，並添加了一些代碼內容豐富的文本框的大小事件：如何使豐富的文本框自動調整

Private Sub TextBox_ContentsResized(sender As Object, e As ContentsResizedEventArgs) Handles TextBox.ContentsResized 

    If TextBox.Height < e.NewRectangle.Height + 12 Then 

     TextBox.Height = e.NewRectangle.Height + 12 

    End If 

End Sub

豐富的文本框現在可以調整它的高度...問題是我不能找到一種方法，使其萎縮，因爲用戶刪除了一些行富文本框

來源

2014-02-12 Aikawa Shirou

您不必製作if條件。只要這樣做...

Private Sub TextBox_ContentsResized(sender As Object, e As ContentsResizedEventArgs) Handles TextBox.ContentsResized 
    TextBox.Height = e.NewRectangle.Height + 12 
End Sub

來源

2014-02-12 05:41:19

如何使豐富的文本框自動調整

回答

相關問題