RTF 제대로

Question

나는 서식있는 텍스트 상자

나는 그것이 서식있는 텍스트 상자에이를두고 파일을 열 때마다로 .RTF를 엽니 다하기 위해 노력하고있어이를 RichTextBox에 개방하지 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도 고려해 볼 수 있습니다.