Texte

vinsus51 Messages postés 39 Date d'inscription vendredi 30 avril 2004 Statut Membre Dernière intervention 7 juin 2013 - 30 avril 2004 à 11:52
pcpunch Messages postés 1243 Date d'inscription mardi 7 mai 2002 Statut Membre Dernière intervention 18 février 2019 - 30 avril 2004 à 14:06
Controles: 1 zone de texte 2 boutons
appuie sur bouton 1 affiche "salut" dans zone de texte
appuie sur bouton 2 affiche "aurevoir" dans zone de texte
seulement "aurevoir" se met a laplace de "salut" moi je veut kil s'ajoute et non kil se remplace !!!!!!!

De meme je souhaite faire de ce texte un historique et par consequent le sauvegarder dans un fichier texte tel que .txt ou .doc comment faire

Merci d'avance a mon sauveur

Vinsus

4 réponses

cs_labout Messages postés 1356 Date d'inscription samedi 8 décembre 2001 Statut Membre Dernière intervention 23 octobre 2006 8
30 avril 2004 à 12:24
labout
Bouton1
TextBox1.text ="Salut"
bouton2
Textbox1.text=textbox1.text & " " & "Au revoir"
@+
0
cs_chris81 Messages postés 589 Date d'inscription jeudi 2 octobre 2003 Statut Membre Dernière intervention 29 avril 2008 2
30 avril 2004 à 12:34
pour le sauvegarder tu creer un streamwriter (= s)

Dim sw As StreamWriter
s = New StreamWriter("C:\...\fichier.txt", true)

s.writeline(textbox1.text)
s.close
0
cs_labout Messages postés 1356 Date d'inscription samedi 8 décembre 2001 Statut Membre Dernière intervention 23 octobre 2006 8
30 avril 2004 à 12:40
labout
c'est du vb.net et ce n'est pas précisé dans la demande
0
pcpunch Messages postés 1243 Date d'inscription mardi 7 mai 2002 Statut Membre Dernière intervention 18 février 2019 5
30 avril 2004 à 14:06
ci joint un petit ex pour l historique :

Private Sub Command1_Click()
Text1 = "Salut"
End Sub

Private Sub Command2_Click()
Text1 = Text1 & " au revoir"
End Sub

Private Sub Text1_Change()
'On note dans le fichier l'heure et le text1 a chaque changment
Open App.Path & "/historique.txt" For Append As #1
Print #1, Now & "," & Text1
Close #1
End Sub

++
0
Rejoignez-nous