VB.NET - RichTextBox - Appliquer le formatage au texte sélectionné

Question

J'ai un contrôle RichTextBox sur mon formulaire. J'ai également ce bouton, intitulé Gras , que je souhaite, si quelqu'un sélectionne du texte dans la RichTextBox , puis appuie sur le bouton, le texte sélectionné devient gras. / strong> Un moyen de le faire? Tâche simple et quotidienne pour les utilisateurs finaux. Merci.

Answer 1

Variation de ce qui précède qui prend en compte l’activation / désactivation du gras en fonction des informations de police du texte actuellement sélectionné:

    With Me.rtbDoc
        If .SelectionFont IsNot Nothing Then
            Dim currentFont As System.Drawing.Font = .SelectionFont
            Dim newFontStyle As System.Drawing.FontStyle

            If .SelectionFont.Bold = True Then
                newFontStyle = currentFont.Style - Drawing.FontStyle.Bold
            Else
                newFontStyle = currentFont.Style + Drawing.FontStyle.Bold
            End If

            .SelectionFont = New Drawing.Font(currentFont.FontFamily, currentFont.Size, newFontStyle)
        End If
    End With

Il faudra peut-être un peu de nettoyage, je l’ai tiré d’un projet plus ancien.

Answer 2

Vous voudrez utiliser la propriété .SelectionFont de RichTextBox et lui attribuer un objet Font avec les styles souhaités.

Exemple - ce code serait dans le gestionnaire d'événements du bouton:

Dim bfont As New Font(RichTextBoxFoo.Font, FontStyle.Bold)
RichTextBoxFoo.SelectionFont = bfont