Discussion :

[xeron33]

Bonjour,
Je souhaiterais ouvrir un fichier texte avec Visual Basic 6 sous Microsoft Visual Studio Community 2022 (64 bits) .
J'ai écris cette petite procédure :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub LireFic()
    Dim Fic As Integer = FreeFile()
    Dim chemin As String
    chemin = "C:\Users\Module_Program.txt"
    Open(chemin) For input As #Fic
End Sub

Et j'ai l'erreur suivante sur l'instruction Open (ligne 5) :

BC30451: Name '<name>' is not declared

J'ai beau regarder dans le forum, tout le monde utilise "open" pour ouvrir un fichier...
Si quelqu'un a une idée
Merci

[licardentaistor]

pourquoi ne pas utiliser ça:

https://www.statology.org/vba-open-text-file/

[xeron33]

MErci pour votre réponse, mais votre code est pour vba et moi j'utilise VB6 sous Visual Studio

J'ai l'erreur suivante

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Dim FSO As New FileSystem

BC30002: Type '<typename>' is not defined

Merci encore

[umfred]

euh, dans Visual Studio, ce n'est pas du VB6, mais du VB.NET, ce n'est plus du tout le même langage que VB6

Edit: Je peux compléter en mettant un lien vers la doc sur la (une) manière de lire un fichier texte en VB.NET https://learn.microsoft.com/en-us/do...xt-from-a-file

[xeron33]

Bsr, pourtant à la création de projet ils parlent de visual basic(console ou winForm) mais pas de vb.net

euh, dans Visual Studio, ce n'est pas du VB6, mais du VB.NET, ce n'est plus du tout le même langage que VB6

Edit: Je peux compléter en mettant un lien vers la doc sur la (une) manière de lire un fichier texte en VB.NET https://learn.microsoft.com/en-us/do...xt-from-a-file

[umfred]

c'est sous-entendu puisqu'après on te demande de choisir la version du framework (.NET5, ..... ou Framework 4.8 selon ce que tu as choisi initialement) mais tu ne vois pas de VB6 (VB6 est totalement abandonné depuis plusieurs années, mais si tu disposes du Visual Studio 6 (dernier IDE de Microsoft pour le VB6), tu peux continuer à développer en VB6. Le VBA se rapproche de VB6 mais ne s'utilise que dans les applications Microsoft (le A de VBA)

[xeron33]

euh, dans Visual Studio, ce n'est pas du VB6, mais du VB.NET, ce n'est plus du tout le même langage que VB6

Edit: Je peux compléter en mettant un lien vers la doc sur la (une) manière de lire un fichier texte en VB.NET https://learn.microsoft.com/en-us/do...xt-from-a-file

**********************
Merci pour ta réponse, mais quand je clique sur ton lien apparait du code C# c'est aussi du VB.net ? Peut on l'adapter dans une procédure écrite dans Visual Studio écrite en Visual Basic ou plûtot vb.net comme tu viens de me l'apprendre ?

Merci pour l'info...

c'est sous-entendu puisqu'après on te demande de choisir la version du framework (.NET5, ..... ou Framework 4.8 selon ce que tu as choisi initialement) mais tu ne vois pas de VB6 (VB6 est totalement abandonné depuis plusieurs années, mais si tu disposes du Visual Studio 6 (dernier IDE de Microsoft pour le VB6), tu peux continuer à développer en VB6. Le VBA se rapproche de VB6 mais ne s'utilise que dans les applications Microsoft (le A de VBA)

[popo]

C# et VB.Net c'est uniquement une question de syntaxe.
Les deux sont du .Net.

Il est possible d'ouvrir un projet en VB6 sous Visual Studio avec l'extension Visual Basic Tools for Visual Studio
Mais cette extension n'est plus maintenue, donc tu ne pourra pas l'installer sur une version 2022.

L'instruction Open est bien du VB6 (existe aussi en VBA).
Mais elle s'écrit sans les parenthèses :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim Fic As Integer = FreeFile
Open "PathToTheFile" For Input As Fic

L'instruction Open n'existe pas en VB.Net.
En VB.Net on utilisa un StreamReader.
ou bien File.ReadAllText (lit tout le texte et le renvoie dans une chaine)
ou bien File.ReadAllLines (lit tout le texte et le renvoie dans collection de chaine)
ou bien File.ReadAllBytes (lit tout le texte et le renvoie un tableau d'octets).
ou bien File.Readline (lit une ligne du fichier).
etc.

[umfred]

**********************
Merci pour ta réponse, mais quand je clique sur ton lien apparait du code C# c'est aussi du VB.net ? Peut on l'adapter dans une procédure écrite dans Visual Studio écrite en Visual Basic ou plûtot vb.net comme tu viens de me l'apprendre ?

Merci pour l'info...

En haut de la page, tu peux choisir le langage affiché, en cliquant sur C#, liste déroulante, choisir VB et hop (mais bizarre, je clique sur le lien et chez moi c'est bien la version VB qui s'affiche)

[popo]

bizarre, je clique sur le lien et chez moi c'est bien la version VB qui s'affiche

Rien de bizarre, il y a juste un cookie qui stocke ce que tu as sélectionné.

[umfred]

Rien de bizarre, il y a juste un cookie qui stocke ce que tu as sélectionné.

bête que je suis, je pensais que c'était encodé dans l'url, mais ce n'est que la langue d'affichage qui y est

[xeron33]

En haut de la page, tu peux choisir le langage affiché, en cliquant sur C#, liste déroulante, choisir VB et hop (mais bizarre, je clique sur le lien et chez moi c'est bien la version VB qui s'affiche)

Merci pour ton aide, je viens de tester ta procédure qui fonctionne en mode console dans visual studio, qui ne fonctionne pas en mode winform ça c'est logique, mais curieusement aucun message d'erreur sur le code(rien ne se passe mais pas de message d'erreur) je l'ai affecté à évènement sur click sur un bouton sur un formulaire.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Console.WriteLine(sr.ReadToEnd())

Si tu as des remarques...

[popo]

Ce n'est pas parce que tu ne le vois pas physiquement que ça ne fait rien...

Console.WriteLine(sr.ReadToEnd()); écrit dans la console.
La console n'est pas visible dans ton exécutable WinForm mais elle existe et tu peux écrire dedans !
Si tu veux provoquer un affichage en WinForm, tu peux utiliser MessageBox.Show(sr.ReadToEnd());.

[umfred]

La console est visible dans l'IDE en mode debug, un des onglets en bas (l'onglet "sortie" )

[popo]

Certes, mais quand tu livres un logiciel, tu ne demande pas à ton client d'installer VS 2022.

[umfred]

Certes, mais il était question ici du code exemple de la page que je lui avais indiqué (qui précise d'ailleurs bien que c'est un code pour une application console)

Donc le Console.WriteLine n'est utile ici que pour afficher le contenu dans la console, pour montrer qu'on a lu le fichier, donc dans le code final, ça ne sert effectivement à pas grand chose.
Lors du développement, on utilisera plutôt Debug.WriteLine dont la sortie ne sera visible que lors du débogage dans le même onglet Sortie

[xeron33]

Bonjour et merci,
Rien ne s'affiche dans l'onglet sortie j'ai ceci :

Le thread '.NET TP Worker' (0x81f4) s'est arrêté avec le code 0 (0x0).
Le thread '.NET TP Worker' (0x97b4) s'est arrêté avec le code 0 (0x0).

Le thread 0x3844 s'est arrêté avec le code 0 (0x0).

Ce qui veut dire pas d'erreurs je pense mais rien ne s'affiche dans l'onglet sortie

[umfred]

ou que le fichier est vide.

[xeron33]

Non il n'est pas vide puisque la même procédure en mode console affiche du texte

[umfred]

Comme l'a suggérer popo, tu as essayé en remplaçant le Console.WriteLine(sr.ReadToEnd()) par un MessageBox.Show(sr.ReadToEnd()) ?
Pour voir si la fenêtre pop up affiche quelque chose.


REmarque peut-être bête, mais si tu as associé la lecture au clic d'un bouton, il faut cliquer dessus pour que ça marche.