IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Windows Forms Discussion :

[VB.NET] Italic ET Bold dans un RichTextBox


Sujet :

Windows Forms

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de Tex-Twil
    Inscrit en
    Avril 2004
    Messages
    447
    Détails du profil
    Informations forums :
    Inscription : Avril 2004
    Messages : 447
    Par défaut [VB.NET] Italic ET Bold dans un RichTextBox
    Bonjour,
    Je dois faire une editeur de texte tres simple en VB.NET. J'aimerais savoir comment faire pour mettre en forme un text a la fois en gras et en italique

    En d'autres termes, si j'ai un texte en gras selectionne et si j'appuye sur le bouton itlique je voudrais que le resultalt soit gras et italique.

    Voici la methode que j'utilise:

    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
        Private Sub ToggleItalic()
            If Not myRichTextBox.SelectionFont Is Nothing Then
                Dim currentFont As System.Drawing.Font = myRichTextBox.SelectionFont
                Dim newFontStyle As System.Drawing.FontStyle
     
                If myRichTextBox.SelectionFont.Italic = True Then
                    newFontStyle = FontStyle.Regular
                Else
                    newFontStyle = FontStyle.Italic
                End If
                myRichTextBox.SelectionFont = New Font( _
                   currentFont.FontFamily, _
                   currentFont.Size, _
                   newFontStyle _
                )
            End If
        End Sub
    merci [/i]

  2. #2
    Membre éclairé Avatar de Tex-Twil
    Inscrit en
    Avril 2004
    Messages
    447
    Détails du profil
    Informations forums :
    Inscription : Avril 2004
    Messages : 447
    Par défaut
    trouve Un petit XOR et c'est bon :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
     
        Private Sub ToggleItalic()
            If Not myRichTextBox.SelectionFont Is Nothing Then
                Dim currentFont As System.Drawing.Font = myRichTextBox.SelectionFont
                Dim newFontStyle As System.Drawing.FontStyle
     
                newFontStyle = FontStyle.Italic Xor currentFont.Style
                myRichTextBox.SelectionFont = New Font( _
                   currentFont.FontFamily, _
                   currentFont.Size, _
                   newFontStyle _
                )
            End If
        End Sub

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Février 2008
    Messages
    229
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Février 2008
    Messages : 229
    Par défaut Merci
    Juste pour te remercier de m'avoir fait connaître le XOR

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Afficher un " dans un RichTextbox vb.net
    Par charaf dans le forum VB.NET
    Réponses: 2
    Dernier message: 30/10/2007, 09h53
  2. [VB.NET] Combinaison de style dans un RichTextBox
    Par Mourad dans le forum Windows Forms
    Réponses: 2
    Dernier message: 04/02/2005, 16h30
  3. [VB.NET] Pb avec le soulignement dans un RichTextBox
    Par Ludog35 dans le forum Windows Forms
    Réponses: 3
    Dernier message: 09/06/2004, 18h59
  4. [VB.NET] Suppression de ligne dans un DataTable
    Par seemax dans le forum Windows Forms
    Réponses: 7
    Dernier message: 06/05/2004, 14h19
  5. [VB.NET]Recuperation de variable dans un URL...
    Par seb_acsg dans le forum ASP.NET
    Réponses: 11
    Dernier message: 28/01/2004, 14h01

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo