VB.Net OpenFileDialog1.ShowDialog

Résolu
cs_JeffC1977 Messages postés 928 Date d'inscription vendredi 10 novembre 2000 Statut Membre Dernière intervention 23 septembre 2023 - 16 oct. 2007 à 21:48
 Utilisateur anonyme - 16 oct. 2007 à 22:07
Salut à tous...

Il y a quelque chose que je ne saisi pas dans mon code...

Je veux ouvrir un fichier et ensuite appelere une procédure...

.....
Private

Sub Button1_Click(
ByVal sender
As System.Object,
ByVal e
As System.EventArgs)
Handles Button1.Click

Dim OpenFileDialog1
As
New OpenFileDialog()

OpenFileDialog1.InitialDirectory =
"C:\Calcul"
OpenFileDialog1.Filter =
"All files (*.*)|*.*|txt files (*.txt)|*.txt"
OpenFileDialog1.FilterIndex = 2

If OpenFileDialog1.ShowDialog() = DialogResult.OK
Then
TraitementFichier(OpenFileDialog1.FileName)

End
If
End
SubPrivate

Sub TraitementFichier(
ByVal NomDuFichier
As
String)

Dim ObjetFichier
As IO.StreamReader =
New IO.StreamReader( OpenFileDialog1.FileName)

Try
......

Pourquoi mon OpenFileDialog1.FileName = à OpenFileDialog1 dans le Debug

Bref ca ne dit pas que j'ouvre le fichier Test.txt

Si quelqu'un voit pourquoi

merci d'avance

1 réponse

Utilisateur anonyme
16 oct. 2007 à 22:07
Salut,

Serait surment mieux comme ca :
Dim ObjetFichier As IO.StreamReader = New IO.StreamReader(NomDuFichier)

__________
Kenji
(
Nouveau forum VBA/Office
3
Rejoignez-nous