VB.net copier le contenu d'un txt dans txtbox [Résolu/Fermé]

Signaler
Messages postés
64
Date d'inscription
vendredi 21 janvier 2011
Statut
Membre
Dernière intervention
19 février 2012
-
Messages postés
64
Date d'inscription
vendredi 21 janvier 2011
Statut
Membre
Dernière intervention
19 février 2012
-
Bonjour,

comme dis dans le titre je voudrais que le contenu d'un fichier texte soit copier dans une textbox...
ça serait juste provisoire!
Merci
<config>Windows 7 / Chrome</config>

2 réponses


Bonjour,

en supposant que le fichier est dans le même répertoire que l'exécutable :


'...

textbox1.Text = LireFichier("NomFichier.txt")

'...


Public Function LireFichier(ByVal NomFichier As String) As String

	Dim Chemin As String = Application.ExecutablePath
	Dim Position As Int32 = Chemin.LastIndexOf("\")
	Dim Dossier As String = Chemin.Substring(0, (Position + 1))
	Dim Chaine As New System.Text.StringBuilder

	Dim LeFichier As StreamReader = File.OpenText(Dossier & NomFichier)

	Do Until LeFichier.Peek = -1
		Chaine.AppendLine(LeFichier.ReadToEnd)
	Loop

	LeFichier.Close()

	Return Chaine.ToString

End Function


Cdt

Lupin
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 65492 internautes nous ont dit merci ce mois-ci

Messages postés
64
Date d'inscription
vendredi 21 janvier 2011
Statut
Membre
Dernière intervention
19 février 2012
17
merci ;)