RTF не открывая в RichTextBox правильно

Question

Я пытаюсь открыть .rtf в Rich Text Box

Каждый раз, когда я открываю файл, он помещает это в Rich Text Box:

http://pastebin.com/jwYwds9y [показывает сырье RTF]

Это мой код, чтобы открыть:

Public Sub openFile() 
    Dim ofd As New OpenFileDialog 
    ofd.Filter = fileFilter 
    ofd.FileName = "" 
    Select Case ofd.ShowDialog() 
     Case DialogResult.OK 
      loadFile(ofd.FileName) 
    End Select 
End Sub 
Public Sub loadFile(ByVal file As String) 
    Try 
     fileName = file 
     setText(IO.File.ReadAllText(file)) 
    Catch ex As Exception 
     MsgBox(ex.Message) 
    End Try 
End Sub 
Public Sub setText(ByVal value As String) 
    Dim t As RichTextBox = tabH.SelectedTab.Controls.OfType(Of RichTextBox)().First() 
    t.Text = value 
End Sub 

у меня есть вкладки и там нет главного текстового поля, когда приложение работает он использует код, чтобы добавить первую вкладку. Код:

Public Sub newFile() 
    Dim t As New TabPage 
    Dim p As New RichTextBox 
    t.Text = "Untitled" 
    p.Parent = t 
    p.Dock = DockStyle.Fill 
    tabH.TabPages.Add(t) 
    t.Visible = True 
    AddHandler p.KeyDown, Sub(sn As Object, e As KeyEventArgs) makeChanged() 
End Sub 

Answer 1

Вам необходимо использовать t.Rtf = value.

Установка свойства .Text вводит данные стенографически, тогда как установка Rtf property заставляет его анализировать данные как RTF.

Вы также можете рассмотреть возможность использования RichTextBox.LoadFile Method.