Bonjour à tous!

Je me suis lancé il y a peu de temps dans Visual Basic. Aussi je teste un peu toutes les fonctionalités du langage pour developper un peu plus tard une application.
SAUF que j'ai un petit problème à la lecture d'un fichier à accès séquentiel.
Voici le script:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Form_Load()
Dim i As Integer
i = 0
Open "C:\visual basic\VB98\event memory\fichier.dat" For Input As #1
Do While Not EOF(1)
Input #1, evNom, evDate
monTab(i).Nom = evNom
monTab(i).date = evDate
i = i + 1
Loop
Close #1
End Sub
L'objectif est de placer consécutivement les données dans un tableau de type udt.
A la compilation on m'affiche "input past end of file" alors que normalement à l'ouverture d'un tel fichier le pointeur est placé au début.

Merci à celui qui pourra élucider ce mistère.

Ouar