"Herfried K. Wagner [MVP]" <hirf-spam-me-here@gmx.at> wrote in message
news:%23fhjGqVhFHA.2072@TK2MSFTNGP14.phx.gbl...
> "S Shulman" <smshulman@hotmail.com> schrieb:
>> Is there any method to edit the text within the RTF control e.g. allow
>> the user to select a text and then select from another control the size
>> of the text
>
> \\\
> Private Sub Form1_Load( _
> ByVal sender As Object, _
> ByVal e As EventArgs _
> ) Handles MyBase.Load
> With Me.ComboBox1
> .DropDownStyle = ComboBoxStyle.DropDownList
> For i As Integer = 1 To 40
> .Items.Add(i.ToString())
> Next i
> End With
> Me.RichTextBox1.HideSelection = False
> End Sub
>
> Private Sub ComboBox1_SelectedIndexChanged( _
> ByVal sender As Object, _
> ByVal e As EventArgs _
> ) Handles ComboBox1.SelectedIndexChanged
> With Me.RichTextBox1
> .SelectionFont = _
> New Font( _
> .SelectionFont.FontFamily, _
> CInt(Me.ComboBox1.SelectedItem) _
> )
> End With
> End Sub
> ///
>
> --
> M S Herfried K. Wagner
> M V P <URL:http://dotnet.mvps.org/>
> V B <URL:http://classicvb.org/petition/>

> Is there any method to edit the text within the RTF control e.g. allow the
> user to select a text and then select from another control the size of the
> text