change text

When the user highlights text in a richtextbox and then clicks a button it should make the selected text italic. How would i do that???

--Ant
--------------------------------------------------
check out my newest freeware
E-mail me at: [email protected]
for the address

Private Sub Command1_Click()
RichTextBox1.SelItalic = True
End Sub


David Paulson

private Sub RichTextBox1_KeyDown(KeyCode as Integer, Shift as Integer)
If KeyCode = vbKeyI And Shift = vbAltMask then
RichTextBox1.SelItalic = true
End If
End Sub





----------
The @host is everywhere!
----------