Discussion :

[JulienCEA]

Bonjour,

j'ai un module dans lequel je déclare une structure qui contient une collection mais je n'arrive pas à l'utiliser, quelque chose m'échappe et malgré aides et forums je trouve pas :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Public Structure World
    Dim Countries as Collection
End Structure
 
Public TheWorld as New World
 
Public Sub Initialisation()
    TheWorld.Countries.Add("France")
End Sub

j'ai l'erreur "L'exception System.NullReferenceException n'a pas été gérée"
Quelle est mon erreur ?

[smyley]

Soit

Code :

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

1
2
 
Dim Countries as New Collection

soit

Code :

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

1
2
3
4
5
 
Public Sub Initialisation()
    TheWorld.Countries = New Collection
    TheWorld.Countries.Add("France")
End Sub

[harz62]

Bonsoir,

Le champ Countries n'est pas private par défaut ?

[monime]

salut mon amigo
je ne comprendre pas ton problème,mais j'ai déjà utilisé les Structure et voici une exemple:
1- dans un module ecrite ce code

Public Structure formateur
Public mat_form As Integer
Public nom As String
Public prénom As String
Public spec As String
End Structure
Public fo As New Collection

et dans une nouvelle form avec 4 label (code,nom,prenom,profession) et bien sur 4 textbox est un button ajouter et inserer le code suivant:

Dim form As formateur
form.mat_form = CType(Me.TextBox1.Text, Integer)
form.nom = Me.TextBox2.Text
form.prénom = Me.TextBox3.Text
form.spec = Me.TextBox4.Text
fo.Add(form, form.mat_form)

Voici tous ce que je connais sur les structure et aussi tu peut utiliser les classes,et bon nuit

[JulienCEA]

Non, ce n est pas ce que je veux.
Je veux que ma structure world contienne une collection Countries. Donc logiquemet je doit declarer cette collection a l interieur de la declaration de world, et non pas dans la procedure initialisation(). Sinon quand je ferais un TheWorld.Countries.Clear() il va me dire que la collection Countries n est pas membre de la structure TheWorld !
Donc comment dois-je m y prendre pour que la collection Countries soit membre de TheWorld ??

[SaumonAgile]

Code :

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

1
2
3
Public Structure World
    Dim Countries as Collection = new Collection()
End Structure

[Pol63]

Bonsoir,

Le champ Countries n'est pas private par défaut ?

dim seul = public je crois

[JulienCEA]

OK ca marche avec

Code :

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

Shared Countries as Collection = New Collection

Je sais pas trop a quoi ca correspond mais bon ca marche c' est l'essentiel

[Pol63]

"L'exception System.NullReferenceException n'a pas été gérée" veut dire que tu as un objet que tu veux utiliser mais qui est à nothing donc inutilisable

dans ta structure tu avais fait

Code :

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

dim machin as collection

dim sert à dire ce que c'est mais ne permet pas de l'utiliser
machin.add plante donc

Code :

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

dim machin as new collection

là ca dit aussi ce que c'est et ca le rend utilisable au passage (new instancie un objet)
machin.add peut fonctionner



le shared veut dire que toutes les instances auront la meme valeur pour la variable

donc que tous les new world que tu fera auront les meme countries

[JulienCEA]

Merci.
J'ai bien compris l'histoire du shared. Pour mon appli ça marche parce que je n'ai qu'un seul "World".
Mais pour ma culture, si je veux créer une autre instance "World" qui aie des differents "Countries" que "TheWorld", comment il faut faire vu qu'avec la declaration shared toutes les instances "World" partagent la même collection "Countries" ? Avec une classe à la place d'une structure peut être ?

[JulienCEA]

Ca y'est j'ai trouvé. Enfin pas moi, car j'avais la solution sous les yeux (pardon smyley) mais j'avais mal lu donc ça marchait pas.
Mon code doit donc être :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Public Structure World
    Dim Countries as Collection
End Structure
 
Public TheWorld as New World
 
Public Sub Initialisation()
    TheWorld.Countries = New Collection
    TheWorld.Countries.Add("France")
End Sub

Merci smyley et merci aux autres.