Примеры работы с RichTextBox control - VB

Формулировка задачи:

Пожалуйста, срочно нужны адреса примеров работы с RichTextBox control. А именно как экспортировать/импортировать DOC/RTF. И как делать проверку правописания. Заранее благодарен.

Решение задачи: «Примеры работы с RichTextBox control»

textual
                            Листинг программы 
                        

                            Private Sub CmdOrfo_Click()
Dim W As Object
Set W = CreateObject('Word.Application')
W.Visible = False
W.Documents.Add
W.Selection.Text = RichTextBox1.Text
W.ActiveDocument.CheckSpelling
RichTextBox1.Text = W.Selection.Text
W.ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges
W.Quit
Set W = Nothing
MsgBox 'Проверка правописания завершена.', vbInformation, 'Проверка правописания'
End Sub
                        