Structure avec un tableau en mémoire [Résolu]

Question

Posez votre question Signaler

Structure avec un tableau en mémoire [Résolu]

Arkilym

Messages postés: 13
Date d'inscription: samedi 18 mai 2019
Statut: Membre
Dernière intervention: 11 novembre 2019

- Modifié le 10 nov. 2019 à 16:34 - Dernière réponse : Whismeril

Messages postés: 13945
Date d'inscription: mardi 11 mars 2003
Statut: Contributeur
Dernière intervention: 11 novembre 2019

- 11 nov. 2019 à 11:18

VB.NET Posez votre question Signaler

Bonjour,
Je dois créer un programme permettant, une fois la saisie des données effectuée, un affichage ligne à ligne des saisies. Je dois utiliser une structure avec un tableau en mémoire à une dimension.

Au moment de l'affichage, le programme coupe et m'affiche l'erreur "L'index se trouve en dehors des limites du tableau" sur la ligne 24 de mon code.

Module test012
    Structure Produit
        Dim refprod, desiprod As String
        Dim puth As Double
        Dim qteprod As Integer
    End Structure
    Sub main()
        Console.ForegroundColor = ConsoleColor.Yellow
        Dim i As Integer

        Dim infoprod(2) As Produit

        For i = 0 To 2
            Console.Write("Saisir la référence du produit : ")
            infoprod(i).refprod = Console.ReadLine
            Console.Write("Saisir la désignation : ")
            infoprod(i).desiprod = Console.ReadLine
            Console.Write("Saisir le prix unitaire ht : ")
            infoprod(i).puth = Console.ReadLine
            Console.Write("Saisir la quantité en stock : ")
            infoprod(i).qteprod = Console.ReadLine
        Next

        Console.WriteLine("{0} {1} {2}", infoprod(i).refprod, infoprod(i).refprod, infoprod(i).refprod)
        Console.Read()
    End Sub
End Module

Je requiers alors votre aide pour trouver une solution. Merci.

Cordialement,

Jean.

Afficher la suite

A voir également:

4 réponses

Signaler Commenter la réponse de Whismeril

Whismeril

Messages postés: 13945
Date d'inscription: mardi 11 mars 2003
Statut: Contributeur
Dernière intervention: 11 novembre 2019

319 10 nov. 2019 à 18:50

1

Merci

Je pensais qu'un index 2 correspondait à 3 éléments (0, 1 et 2), alors que non. Merci de me l'avoir fait remarquer.

Oui c’est bien ça.
Et dans le code que tu as montré, ton tableau ne peut avoir que 2 éléments

Dire « Merci » 1

Heureux de vous avoir aidé ! Vous nous appréciez ? Donnez votre avis sur nous ! Evaluez CodeS-SourceS

Codes Sources 210 internautes nous ont dit merci ce mois-ci

Signaler Commenter la réponse de Arkilym

Arkilym

Messages postés: 13
Date d'inscription: samedi 18 mai 2019
Statut: Membre
Dernière intervention: 11 novembre 2019

- Modifié le 11 nov. 2019 à 11:18

Bonjour,
Merci pour votre aide et bonne continuation.

Signaler Commenter la réponse de Whismeril

Whismeril

Messages postés: 13945
Date d'inscription: mardi 11 mars 2003
Statut: Contributeur
Dernière intervention: 11 novembre 2019

319 - 11 nov. 2019 à 11:18

Houla, je m’aperçois que je n’ai pas été clair.
Un index 2 correspond au 3 eme enregistrement, ce qui posait problème dans ton code c’est qu’il n’y a pas de 3eme enregistrement puisqu’il n’y en a que 2

Signaler Commenter la réponse de vb95

vb95

Messages postés: 1962
Date d'inscription: samedi 11 janvier 2014
Statut: Contributeur
Dernière intervention: 11 novembre 2019

74 Modifié le 10 nov. 2019 à 23:45

1

Merci

Bonsoir à vous deux
Effectivement ton tableau n'a que 2 éléménts
Une astuce que j'utilise toujours
Je ne mets pas comme code

Dim infoprod(3) As Produit

mais

Dim infoprod(0 to 2) As Produit

Dans le second cas tu as les bornes inférieures et supérieures du tableau et cela est plus parlant .

Tu dis ne rien voir : regarde ta boucle For = elle va de 0 à 2 pour les 3 produits
En fin de boucle i est donc à 3 lorsque tu as fais les 3 saisies : la saisie 0, la saisie 1 et la saisie 2
Vu que i vaut 3 les affichages ne peuvent se faire ( i va de 0 à 2 )

Essaie ce code et regardesl'image plus bas

Structure Produit
        Dim refprod, desiprod As String
        Dim puth As Double
        Dim qteprod As Integer
    End Structure

    Sub Main()

        Console.ForegroundColor = ConsoleColor.Yellow
        Dim i As Integer
        Dim infoprod(0 To 2) As Produit
        For i = 0 To 2
             ' saisie des informations
            Console.Write("Saisir la référence du produit : ")
            infoprod(i).refprod = Console.ReadLine
            Console.Write("Saisir la désignation : ")
            infoprod(i).desiprod = Console.ReadLine
            Console.Write("Saisir le prix unitaire ht : ")
            infoprod(i).puth = Console.ReadLine
            Console.Write("Saisir la quantité en stock : ")
            infoprod(i).qteprod = Console.ReadLine
            Console.WriteLine()
            ' Affichage des 3 lignes de produit
            Console.WriteLine("{0} {1} {2} {3}", infoprod(i).refprod, infoprod(i).desiprod, infoprod(i).puth, infoprod(i).qteprod)
        Next
        Console.Read()
    End Sub

Ensuite un très bon cours pour VB Net ( bien qu'il date un peu ) : https://plasserre.developpez.com/cours/vb-net/

Dire « Merci » 1

Heureux de vous avoir aidé ! Vous nous appréciez ? Donnez votre avis sur nous ! Evaluez CodeS-SourceS

Codes Sources 210 internautes nous ont dit merci ce mois-ci

Signaler Commenter la réponse de vb95

vb95

Messages postés: 1962
Date d'inscription: samedi 11 janvier 2014
Statut: Contributeur
Dernière intervention: 11 novembre 2019

74 11 nov. 2019 à 01:26

1

Merci

Bonsoir !
Pas sûr que ceci soit correct au message précédent :

Tu dis ne rien voir : regarde ta boucle For = elle va de 0 à 2 pour les 3 produits
En fin de boucle i est donc à 3 lorsque tu as fais les 3 saisies : la saisie 0, la saisie 1 et la saisie 2
Vu que i vaut 3 les affichages ne peuvent se faire ( i va de 0 à 2 )

Dire « Merci » 1

Heureux de vous avoir aidé ! Vous nous appréciez ? Donnez votre avis sur nous ! Evaluez CodeS-SourceS

Codes Sources 210 internautes nous ont dit merci ce mois-ci

Signaler Commenter la réponse de Arkilym

Arkilym

Messages postés: 13
Date d'inscription: samedi 18 mai 2019
Statut: Membre
Dernière intervention: 11 novembre 2019

- 11 nov. 2019 à 11:18

Bonjour,
Merci pour votre aide, je prends note de ces informations. Je suis bien parti pour un moment de lecture. Bonne continuation.

Répondre Posez votre question

Houla, je m’aperçois que je n’ai pas été clair.
Un index 2 correspond au 3 eme enregistrement, ce qui posait problème dans ton code c’est qu’il n’y a pas de 3eme enregistrement puisqu’il n’y en a que 2
Bonjour,
Merci pour votre aide, je prends note de ces informations. Je suis bien parti pour un moment de lecture. Bonne continuation.

Whismeril · Accepted Answer · 2019-11-10T17:19:27+0100

Meilleure réponse

Signaler Commenter la réponse de Whismeril

Whismeril

Messages postés: 13945
Date d'inscription: mardi 11 mars 2003
Statut: Contributeur
Dernière intervention: 11 novembre 2019

319 10 nov. 2019 à 17:19

1

Merci

Bonjour

ton tableau contient, 2 éléments, index 0 et index 1
de la ligne 13 à 22, tu fais un for, qui tourne tant que i est inférieur à 2, donc on passe à la ligne 24 quand i vaut 2, cet index est bien au delà de l'index max

Dire « Merci » 1

Heureux de vous avoir aidé ! Vous nous appréciez ? Donnez votre avis sur nous ! Evaluez CodeS-SourceS

Codes Sources 210 internautes nous ont dit merci ce mois-ci

Signaler Commenter la réponse de Arkilym

Arkilym

Messages postés: 13
Date d'inscription: samedi 18 mai 2019
Statut: Membre
Dernière intervention: 11 novembre 2019

- 10 nov. 2019 à 18:40

Je pensais qu'un index 2 correspondait à 3 éléments (0, 1 et 2), alors que non. Merci de me l'avoir fait remarquer.

Mais même en corrigeant cette erreur, il n'y a pas d'affichage. Le terminal se ferme après la saisie des données. Je ne vois pas où peut être le problème.

Structure avec un tableau en mémoire [Résolu]

Votre réponse