Pb de restauration de SAUVEGARDE avec un textBox

Question

dans un textbox avec la propriété Multiline = True

En supposant que j'écrive dans ma fenêtre << Je suis né le 15/07/2000 >>. j'enregistre mon texte avec:

Open "C:\chemin" For Output As #1
Print #1, text1.text;
Close 1

Pourquoi lorsque je rappelle ma sauvegarde avec:

Open "C:\chemin" For Input As 1
Text1.Text = Input(LOF(1), 1)
Close 1

Mon texte devient << Je suis né le >>. Pourquoi la date a t'elle disparu ????

Merci par avance
Fred

VB_MAN · Answer

Regarde j'ai écrit la même chose que toi et tout fonctionne #1 chez moi, au pire ta juste à utiliser une variable de Type String pour sauvegarder et restaurer le contenue de ton TextBox,

VarString = Text1.Text
Print #1, VarString;

' Et,

VarString = Input(LOF(1), 1)
Text1.Text = VarString

'-----------------------------------------'

' Ce que j'ai essayer:
Private Sub Command1_Click()

Open "C:\Mon fichier.txt" For Output As #1
Print #1, Text1.Text;
Close #1

End Sub

Private Sub Command2_Click()

Open "C:\Mon fichier.txt" For Input As #1
Text1.Text = Input(LOF(1), 1)
Close #1

End Sub

[mailto:VB__MAN@Hotmail.com VB_MAN]

marc · Answer

j'aimerai bien savoir comment, je pourrais imposer une mise en forme conditionnelle alors que les trois prédéfinie par bill ne sont pas assez, il m'en faudrait 4 ou 5 donc 2 de +.
Est-il possible aussi de trové la formule afin que dans la cellule ex : z1 puisse faire le calcul de a1:t1 des cases qui ont de la couleur afin d'établir une sorte de compteur même si la case contient un chiffre .
Est-il possible dans une macro d'imposer une date afin que celle-ci si elle est dépassée la macro dévie vers application.quit
Merci d'avance
Marc

 8-)

Pb de restauration de SAUVEGARDE avec un textBox

2 réponses

Discussions similaires