ouvrir contenu d un fichier txt dans une textbox

Question

J'ai essayé plusieurs codes sur ce site pour ouvrir le contenu d'un fichier TXT dans une textbox mais aucun n'a marché.
J'ai donc créé un fichier txt se trouvant à "C:\doc.txt". Ensuite sur une form, j'ai créé un bouton de commande et une textbox. En cliquant sur le bouton de commande, je voudrai que le contenu de mon fichier "doc.txt" apparaisse dans ma textbox
merci à tous

PatriceVB · Answer

dim ligne as string
open "nomfichier" for input as #1
line input #1, ligne
while not eof(1)
text1.text =text1.text & vbcrlf &  ligne
line input #1, ligne
wend
close #1

zazsze · Answer

Pourquoi la première qui apparaît est une ligne vierge alors que dans mon fichier texte il y a quelquechose d'écrit sur la première ligne. D autre part, la dernière ligne de mon fichier texte n apparaît pas sauf si je crée une ligne vide à la fin de mon texte ?
Encore merci

hvb · Answer

Dim ligne As String
Dim nomfichier As String
Open nomfichier For Input As #1
While Not EOF(1)
 Line Input #1, ligne
Text1.Text = Text1.Text & ligne & vbCrLf
Wend
Close #1

la tu n'auras plus ce probleme, mais ca t'ajoute par contre un retour chariot et un line feed (vbcrlf) apres ton texte... mais tu peux le supprimer facilement, vu que tu sais que c obligatoirement les deux derniers characteres.

elgringo_mendoza · Answer

Salut

j'ai un pb avec le code que tu as mis, je tape entrer pour afficher le contenu du .txt dans ma TextBox, et une fois que tout le .txt s'est affiche j'ai un bug. qd je met debogage ca me ramene a cette ligne:
open "nomfichier" for input as #1
("nomfichier" = "d:	est.txt")
je debut le vb, donc desole si c'est une question bete.

Merci de votre aide :-)
chau chau

cs_Gabi · Answer

si nomfichier contient une valeur (le nom du fichier en fait), c'est que c'est une variable. Tu ne dois pas mettre nomfichier entre guillemets

Ouvrir contenu d un fichier txt dans une textbox

5 réponses

Discussions similaires