VB.net copier le contenu d'un txt dans txtbox

Résolu/Fermé
hacker1997 Messages postés 64 Date d'inscription vendredi 21 janvier 2011 Statut Membre Dernière intervention 19 février 2012 - 17 févr. 2012 à 11:29
hacker1997 Messages postés 64 Date d'inscription vendredi 21 janvier 2011 Statut Membre Dernière intervention 19 février 2012 - 17 févr. 2012 à 21:03
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

Utilisateur anonyme
17 févr. 2012 à 20:51
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
hacker1997 Messages postés 64 Date d'inscription vendredi 21 janvier 2011 Statut Membre Dernière intervention 19 février 2012 17
17 févr. 2012 à 21:03
merci ;)
0