[VB.NET]Utilisation d'une structure

Bonjour à tous.
Pour un de mes projets, je souhaiterais utiliser une structure qui ressemble à ça:
Code:

1 2 3 4 5 6 7 Public Structure MySQLReadingResult Public sNom As String Public sAdresse As String Public sCP As String Public sVille As String Public sTel As String End Structure
Je déclare ensuite ça:

Code:

Public Monresultat() As MySQLReadingResult

(Vous l'avez compris, j'utilise une base MySQL.)

J'ai ensuite une fonction qui se connecte à la base MySQL et qui exécute une requête:
Code:

1 2 3 4 5 6 7 8 While objDataReader.Read Monresultat(i).sNom = objDataReader.GetString(0) Monresultat(i).sAdresse = objDataReader.GetString(1) Monresultat(i).sCP = objDataReader.GetString(2) Monresultat(i).sVille = objDataReader.GetString(3) Monresultat(i).sTel = objDataReader.GetString(4) i += 1 End While
Et au débogage il me dit :

Citation:

La référence d'objet n'est pas définie à une instance d'un objet.

Je comprends pas pourquoi...
Et bien entendu, pas possible d'utiliser de "new" car il s'agit de tableau.

Qqn pourrait-il m'indiquer où je me plante?
Un petit coup de pousse me conviens également !!

Merci à vous

la tu déclare "Monresultat" mais tu ne l'instancie pas.

il manque un new...

je ne fais pas de vbnet mais du C#, ça donnerai

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 
public List<MySQLReadingResult> Monresultat;
 
void Mafontion()
{
    //blabla connection bdd etc
    //probleme on ne sait pas combien il y a de resultat, je ne peux pas faire de tableau
    //j'ai utilisé une liste du coup
 
    Monresultat = new List<MySQLReadingResult>();
 
    MySQLReadingResult maStruct;
    while(objDataReader.Read)
    {
       maStruct = new MySQLReadingResult(); //plus sur si on est oblige pour une structure
 
//PS : c'est plus rapide d'utiliser une variable temporaire plutot que d'acceder a chaque fois à ton tableau
                maStruct.sNom = objDataReader.GetString(0)
                maStruct.sAdresse = objDataReader.GetString(1)
                maStruct.sCP = objDataReader.GetString(2)
                maStruct.sVille = objDataReader.GetString(3)
                maStruct.sTel = objDataReader.GetString(4)
 
       Monresultat.Add(maStruct);
    }
 
}

autre chose, la structure va être recopiée à chaque passage de parametre ou d'assignation à une autre variable.
j'utilise jamais de structure pour cette raison mais des class même pour stocker des données et ça n'engage que moi

Citation:

Envoyé par Yolak

Et bien entendu, pas possible d'utiliser de "new" car il s'agit de tableau

Visual studio me dit:

Citation:

Les tableaux ne peuvent pas être déclarés avec New

J'ai jamais utilisé les structures en vb donc je souhaite vraiment comprendre...

Bonjour,

ça serait bien embêtant de pas pouvoir initialiser un tableau :aie: donc au choix selon que tu connaisses d'avance le nombre d'élément que contiendra ton tableau (avec un Count)
Code:

1 2 3 4 5 ' Taille représente le résultat de la requête count ici Public Monresultat() As MySQLReadingResult = New MySQLReadingResult(Taille - 1) {} ' ou Public Monresultat(Taille - 1) As MySQLReadingResult
Si tu ne sais pas combien d'élément aura ton tableau, il faut passer par quelque chose de plus dynamique comme une List(Of T) comme suggéré par mickyoun, voilà ce que donnerais la déclaration en VB.Net (au cas où ^^)

Code:

Public Monresultat As New List(Of MySQLReadingResult)

En espérant t'avoir aidé ;)

Cordialement !

Citation:

Envoyé par Sehnsucht

Code:

Public Monresultat As New List(Of MySQLReadingResult)

En espérant t'avoir aidé ;)

Cordialement !

Bonjour,
Oui ça m'aide... Mais ça m'embrouille aussi !!!
Comment tu remplis la structure avec ça??

Je peux pas faire:

Code:

Monresultat.Add(objDataReader.GetString(0))

Enfin.... Ça n'a aucun sens!!
Je m'éloigne là je crois...

Comment je remplace ça:
Code:

1 2 3 4 5 6 7 8 While objDataReader.Read Monresultat(i).sNom = objDataReader.GetString(0) Monresultat(i).sAdresse = objDataReader.GetString(1) Monresultat(i).sCP = objDataReader.GetString(2) Monresultat(i).sVille = objDataReader.GetString(3) Monresultat(i).sTel = objDataReader.GetString(4) i += 1 End While

Pour remplir, il suffit juste de convertir le code fourni par mickyoun en VB.Net ;)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Dim tempResult As MySQLReadingResult
 
While objDataReader.Read
    tempResult = New MySQLReadingResult
 
    tempResult.sNom = objDataReader.GetString(0)
    tempResult.sAdresse = objDataReader.GetString(1)
    tempResult.sCP = objDataReader.GetString(2)
    tempResult.sVille = objDataReader.GetString(3)
    tempResult.sTel = objDataReader.GetString(4)
 
    Monresulat.Add(tempResult)
End While

Cordialement !

Ah ouaiiis!
Là je comprends lol!!

Merci énormément!
J'aurais jamais trouvé seul (enfin si mais ça m'aurai pris plus de temps!)