Bonjour,
j'ai un soucis avec le formatage text RTF

voici le code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
 Sub detailUser(ByVal login As String, ByVal champTxt As TextBox)
        champTxt.Clear()
        Dim ds As New DirectorySearcher()
 
        ds.Filter = "samaccountname=" & login
 
        Dim sr As SearchResult = ds.FindOne()
 
 
        Dim txtRTF
        txtRTF = "{\rtf1\ansi"
        For Each var As String In sr.Properties.PropertyNames
 
            txtRTF = txtRTF & "\b\ul\caps " & var & ":\par\b0\ul0\caps0 " & sr.Properties(var)(0).ToString() & "\par\par"
 
        Next
 
        txtRTF = txtRTF & "}"
        RichTextBox1.Rtf = txtRTF
    End Sub

mon problème est que cet objet sr.Properties(var)(0).ToString() contient des caractères qui déforme mon texte (mon texte se rétréci au bout de qq lignes )
qu-est ce que je dois mettre comme balise RTF pour ignorer le formatage RTF



merci d'avance