Textbox et bouton
Résolu
slurp5
Messages postés
2
Date d'inscription
mercredi 6 juillet 2005
Statut
Membre
Dernière intervention
8 juillet 2005
-
8 juil. 2005 à 14:18
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 - 8 juil. 2005 à 15:27
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 - 8 juil. 2005 à 15:27
2 réponses
jpleroisse
Messages postés
1788
Date d'inscription
mardi 7 novembre 2000
Statut
Membre
Dernière intervention
11 mars 2006
27
8 juil. 2005 à 15:27
8 juil. 2005 à 15:27
Bonjour,
Tu places 2 TextBox et un CommandButton sur ta Form.
Places la propriété Multiligne du Text2 à True.
Private Sub Command1_Click()
Dim texte, tout, crlf
On Error Resume Next
crlf = Chr$(13) + Chr$(10)
Open "C:" + Text1.Text For Input As #1
Line Input #1, texte
tout = texte
If Len(tout) <> 0 Then
While Not EOF(1)
Line Input #1, texte
tout = tout + crlf + texte
Wend
End If
Text2.Text = tout
Close #1
End Sub
Par exemple pour ouvrir un fichier MonFichier.txt qui se
trouverais dans le répertoire C:\ Dossier, dans le TextBox1 tu mets
Dossier\MonFichier.txt (ne pas oublier l'extention).
jpleroisse
Tu places 2 TextBox et un CommandButton sur ta Form.
Places la propriété Multiligne du Text2 à True.
Private Sub Command1_Click()
Dim texte, tout, crlf
On Error Resume Next
crlf = Chr$(13) + Chr$(10)
Open "C:" + Text1.Text For Input As #1
Line Input #1, texte
tout = texte
If Len(tout) <> 0 Then
While Not EOF(1)
Line Input #1, texte
tout = tout + crlf + texte
Wend
End If
Text2.Text = tout
Close #1
End Sub
Par exemple pour ouvrir un fichier MonFichier.txt qui se
trouverais dans le répertoire C:\ Dossier, dans le TextBox1 tu mets
Dossier\MonFichier.txt (ne pas oublier l'extention).
jpleroisse
cs_sitemo
Messages postés
341
Date d'inscription
samedi 8 novembre 2003
Statut
Membre
Dernière intervention
29 juin 2011
1
8 juil. 2005 à 14:24
8 juil. 2005 à 14:24
tu peux reformuler ta question tu veux un bouton un textbox
quand tu clike sur le bouton, il touvre un fichier c ca?
MK
quand tu clike sur le bouton, il touvre un fichier c ca?
MK
