Bonjour à tous,

Dans l'exemple que j'ai trouver pour me faire un petit bloc note j'ai un commandbouton "ouvrir" et j'ai une erreur à la ligne :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
retour = Chr$(13) + Chr$(10)
voici tout mon code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Ouvrir_Click()
On Error Resume Next
Open "c:\windows\bureau\note.exe" For Input As #1
retour = Chr$(13) + Chr$(10)
Line Input #1, texte
tout = texte
If Len(tout) <> 0 Then
While Not EOF(1)
Line Input #1, texte
tout = tout + retour + texte
Wend
End If
Close #1
End Sub
merci de votre aide et bonne soirée