none
ecrire des notes par l'utilisateur RRS feed

  • Question

  • bonjour

     j'arrive au terme de mon programme et je voudrais mettre un forme où l'utilisateur puisse écrire des notes  mais cela je sais pas faire. je serais heureux si  vous pouviez m'aider merci d'avance

    avec vb2010

    vendredi 29 janvier 2016 11:20

Réponses

  • Ou voulez-vous sauvegarder les Notes? dans un fichier txt par exemple?

    il me semble que un RichTextBox est tout indiqué:

     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
            'Prendre le texte de la RichTextBox et sauvegarder dans texte
            RichTextBox1.SaveFile(Application.StartupPath & "\Note.txt", RichTextBoxStreamType.PlainText)
        End Sub

    Cela donne ceci:

    Attention le savefile écrase le fichier...sinon il faut recharger le fichier avant de le réécrire....

    Ici le MSDN sur RichTextBox SaveFile


    Cyrille Precetti <br/>

    • Marqué comme réponse SIMONGEORGES vendredi 29 janvier 2016 13:30
    vendredi 29 janvier 2016 11:56
  • Si vous utilisez la deuxième version avec Lines et AppendAllText il n'y a pas besoin de charger le fichier avant de faire AppendAllText.


    Cyrille Precetti <br/>

    • Marqué comme réponse SIMONGEORGES vendredi 29 janvier 2016 16:17
    vendredi 29 janvier 2016 15:38

Toutes les réponses

  • Ou voulez-vous sauvegarder les Notes? dans un fichier txt par exemple?

    il me semble que un RichTextBox est tout indiqué:

     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
            'Prendre le texte de la RichTextBox et sauvegarder dans texte
            RichTextBox1.SaveFile(Application.StartupPath & "\Note.txt", RichTextBoxStreamType.PlainText)
        End Sub

    Cela donne ceci:

    Attention le savefile écrase le fichier...sinon il faut recharger le fichier avant de le réécrire....

    Ici le MSDN sur RichTextBox SaveFile


    Cyrille Precetti <br/>

    • Marqué comme réponse SIMONGEORGES vendredi 29 janvier 2016 13:30
    vendredi 29 janvier 2016 11:56
  • merci  beaucoup c'est super

    vendredi 29 janvier 2016 13:34
  • et pour le lire le fichier et l'afficher dans le text box j'ia pas compris comment faire merci d'avance
    vendredi 29 janvier 2016 13:38
  • Comme SaveFile est pratique mais écrase le fichier il faut faire plus compliqué :)

    Une idée est de recharger les notes existantes depuis le fichier et ensuite réécrire en écrasant le fichier mais avec tout son contenu avec SaveFile... compliqué et pas élégant...

    Par contre on peut passer outre la RTB pour la sauvegarde pour ajouter à la fin du fichier:

            'Prendre le texte de la RichTextBox et sauvegarder dans texte'
            'Ceci sauvegarde uniquement ce qui est dans la RTB et écrase le fichier...ne garde donc que la dernière note.'
            RichTextBox1.SaveFile(Application.StartupPath & "\DerniereNote.txt", RichTextBoxStreamType.PlainText)
    
            'Ici on lit la RTB est on ajoute à la fin d'un fichier pour garder toutes les notes...
            Dim MaNouvelleNote As String
            For Each MaNouvelleNote In RichTextBox1.Lines
                System.IO.File.AppendAllText(Application.StartupPath & "\ToutesLesNotes.txt", MaNouvelleNote & Environment.NewLine)
            Next
    Le SaveFile conserve le format de ce qui est écrit, par contre


    Cyrille Precetti


    • Modifié Cyrille Précetti vendredi 29 janvier 2016 14:02 Modification pour ajouter les lignes et newline
    vendredi 29 janvier 2016 13:53
  • je viens de le tester cela fonctionne bien mais j'ia pas reussi à le lire et à le charger dans le richtexbox  j’ai encore besoin de votre aide merci beaucoup
    vendredi 29 janvier 2016 15:30
  • Si vous utilisez la deuxième version avec Lines et AppendAllText il n'y a pas besoin de charger le fichier avant de faire AppendAllText.


    Cyrille Precetti <br/>

    • Marqué comme réponse SIMONGEORGES vendredi 29 janvier 2016 16:17
    vendredi 29 janvier 2016 15:38