Private Sub Command1_Click()
 
Call Shell(" C:\essai.txt ", 1)
 
End Sub
 
 
voila sa ne marche vraiment pas    
ou est l'erreur  et pourriez vous me donner le bon code svp
 

Pas étonnant !
La fonction Shell sert à lancer un exécutable.
 
==> call shell("c:\windows\notepad.exe c:\essai.txt",1) : lance l'éditeur notepad qui ouvre le fichier essai.txt.

Si tu souhaites ouvrir ton .txt avec l'éxécutable associé :
 

Private Sub Form_Load()
      Call ShellExecute(0, "open", "d:\temp\prout.txt", vbNull, vbNull, vbNormalFocus)
  End Sub  
 
 
Ca donne precedure sub ou fonction non definie

1 - Ouvre les yeux*,
2 - il faut* que le fichier "prout.txt" existe dans le meme répertoire.
 
 
* astuce : Private Declare ...
* astuce : tu peux aussi changer le chemin