Discussion :

[cartmanss]

Bonjour je suis à la recherche d'un code depuis un certain temps et je ne trouve pas.

Je vous explique:

Alors je voudrai que l'utilisateur puisse rentrer un texte dans textbox9 et que le texte rentrer se transfert dans textbox2 jusque la pas de souci

mais je voudrais que le texte de textbox2 reste à la fermeture du programme de facon à ce que quand l'utilisateur rouvre le programme, textbox2 soit toujours rempli.

voici mon code actuelle:

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
22
23
24
25
26
27
28
29
30
31
Imports System.IO
Public Class Form4
    Dim list As String = "dossier"
    Dim ecrire As StreamWriter
    Dim lire As StringReader
    Sub listfavoris()
        If File.Exists(list) = False Then
            ecrire = File.CreateText(list)
            ecrire.Close()
        End If
        lire = New StringReader(list)
        lire.Close()
    End Sub
    Private Sub Form4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If File.Exists(list) = False Then
            ecrire = File.CreateText(list)
            ecrire.Close()
        End If
        lire = New StringReader(list)
        lire.Close()
        ecrire.Flush()
        ecrire.Close()
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox2.Text = TextBox9.Text
        ecrire = File.CreateText(list)
        ecrire.Close()
        lire = New StringReader(list)
        lire.Close()
    End Sub
End Class

[mddu66]

bonjour,

je pense le plus simple et d'enregistrer ce message dans un fichier TXT et de le resortir au demarrage de votre porgramme.

[cartmanss]

bonjour
Oui mais je voudrai que l'utilisateur n'ai pas besoin de faire quelque chose.
Quand il ouvre le programme je voudrai qu'il rècupère la textbox2 comme il la laisser à la fermeture.
merci de m'aider

[mddu66]

alors ça doit donné un truc du style

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
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim sw As StreamWriter = New StreamWriter("c:\txt.txt")
        Try
            Dim i As Integer = 0
            While i < TextBox1.Lines.Length
                sw.WriteLine(TextBox1.Lines(i))
                System.Math.Min(System.Threading.Interlocked.Increment(i), i - 1)
            End While
        Finally
            If Not (sw Is Nothing) Then
                sw.Close()
            End If
        End Try
        End

la vous avez un bouton qui enregistre avant de quitter votre programme

et pour le lire au demarrage vous mettez ceci dans la form1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
If System.IO.File.Exists("c:\txt.txt") Then
            TextBox1.Text = IO.File.ReadAllText("C:\txt.txt")
        End If

[yonpo]

Oulala! Vous sortez l'artillerie lourde là

Un petit My.Settings suffirait amplement.
Pour créer un paramètre,
Propriété du projet-> Paramètres-> Nom du paramètre-> Type string

Ensuite pour l'utiliser:

Code VB :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
textbox2.Text=My.Settings.NomDuParamètre

Bon après si tu veux utiliser un fichier texte, c'est comme tu veux....

[MABROUKI]

bonjour,
yonpo ,tu as donne la moitie de la solution .quand il quitte son application il peut sauver son parametre.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
'ouverture du formulaire principal  dans sub new ou Formload
textbox2.Text=My.Settings.NomDuParamètre
'Fermeture du formulaire principal  dans sub form_closing
'l'utilisateur peut modifier son texte(par exemple nom d'utilsateur)
 
My.Settings.NomDuParamètre=textbox2.Text
my.settings.Save.

bon code.............