Probléme d'importation de fichier texte

Bonsoir,
Je cherche a importer un fichier txt contenant de trés nombreux caractéres speciaux (tous dans la table ASCII).Seulement je n'arrive pas a mettre son contenue dans une textbox.
J'ai essayé ces deux methodes :
'    Dim canal As Integer
'    Dim text As String
'    canal = FreeFile
'    Open File For Input As #canal
'    TxTIn.Text = Input(LOF(canal), #canal)
'    If TxTIn.Visible = False Then ButtonPlus2.Value = True
[Erreur : l'entrée dépasse la fin de fichier]
et
'Open File For Input As #1
'While Not EOF(1)
'Input #1, a$
'TxTIn.Text = TxTIn.Text + a$ + Chr$(13) + Chr$(10)
'Wend
'Close #1
'If TxTIn.Visible = False Then ButtonPlus2.Value = True
[Erreur : mon texte n'est pas importé en entier (moins d'un quart)]

=> ces 2 methodes marchent pourtant a merveille avec des fichiers bien plus gros.
Avez vous un moyen qui me permetterai de réperer mon "texte" ?
Merci d'avance

La textbox est limitée à 65535 caractères (64ko) si ton texte est de taille suppérieure il faut utiliser la RichTextBox.


---- Sevyc64  (alias Casy) ----

---

# LE PARTAGE EST NOTRE FORCE #    [ Lien ]

Merci pour cette information mais ce texte n'excéde pas 3000 caractéres.
Je suis en train de créer une petite appli (pour mon usage peronel) autour d'un code que j'ai trouvé ici (cryptage) et j'aimerai entre autres y ajouter une fonction "importer texte".
L'importaton de fichiers non chiffrés se passe sans problémes mais en ce qui concerne les fichiers chiffrés...
PS : ce n'est pas le "fichier" qui est chiffré mais le texte contenue dans ce fichier (le fichier chiffré reste au format txt).
Je ne sais pas si les caractéres vont passer mais je vait essayer de vous montrer le rendu :
;�ͳåTNÕ³ÑÍa"Ô±ÑÆX'Ø?ÑÁX~Ç°ÍW-Ùm
(«^"?fB'Ç»ÑìP?˱ÑÚcN~~ë©h~?ÝT^½?~ä?g.á©&;p�Úc"Õ¿³.
Ï»èf¡?¥TB~~mÙÐX½?¡Ñ®^-{ã¯^�Z»ÆBw«?ÑÂ]¢Ë¿ ÞcN«Å"å^ Ë¿Ñï&\-}Ñ¡&\-}߯^-{â¯$_~v?f1�ÕÁÑæ^'Ë?ÑÇ^ Ó®?ø;p¾'ç]
-Ô?Ñéa�ɲ%ìT¡ Z»?)¦?-ÿ?>.¹©òb¢Ëºä«K¡ÓÀ%§T|ËZ»?)¦?-ÿ?>.
¹©%òb¢Ëºä«K¥Ï»èV�Ô{ñT;p�ëÕFw?'
ÐB¦ÙÆ%íT>TìT Ü¶Þb\ËÅ?øq ©   

Merci infiniment ca marche,reste a savoir si je comprendrai pourquoi un jour ^^
Pourquoi cela fonctionne de cette facon ?
Grace a la methode d'accés au fichier (binary) ou au simple fait de l'avoir enregistré dans une chaine avant ?

C'est le mode d'accès Binary qui permet de lire n'importe quoi. D'ailleurs, je viens de m'en apercevoir, la méthode Input normale marche aussi du moment que le fichier est en mode binaire : Contenu = Input(LOF(1), #1).
Par contre, attention, en mode binaire, l'ouverture d'un fichier qui n'existe pas crée un fichier vide et ne provoque aucune erreur.

salut tout le monde

je suis nouveau dans ce forum
et j'ai besoin des codes qui permettent la mise en place du feuille avant l'impression

bonjour;

je cherche a telecharger un autoformation en visual basic

qui parmit vous peuvent me donner le nom du site SVP