[VB6] Tableau de classes

Bonjour,
J'ai créé plusieurs classes qui contiennent uniquement des variables.
Classe clsA

Code:

---

1 2	Public Reference As String Public Designation As String

---

Classe clsB

Code:

---

1 2	Public Reference As String Public Designation As String

---

Classe clsC

Code:

---

1 2	Public Reference As String Public Designation As String

---

...
J'instancie un tableau de classes par classe dans ma form principale.

Code:

---

1 2 3

Dim A() As New clsA Dim B() As New clsB Dim C() As New clsC

---

Je ne peux pas déclarer ma variable en Public sinon, j'ai l'erreur suivante:

Citation:

---

---------------------------
Microsoft Visual Basic
---------------------------
Compile error:

Constants, fixed-length strings, arrays, user-defined types and Declare statements not allowed as Public members of object modules
---------------------------
OK Aide
---------------------------

---

J'accède sans problème à aux variables de A(), B() et C() dans ma form principales, mais comment puis-je accéder à ces A(), B() et C() dans une autre form?

Citation:

---

Envoyé par Jérôme PRAT

Bonjour,
J'ai créé plusieurs classes qui contiennent uniquement des variables.
Classe clsA

Code:

---

1 2	Public Reference As String Public Designation As String

---

Classe clsB

Code:

---

1 2	Public Reference As String Public Designation As String

---

Classe clsC

Code:

---

1 2	Public Reference As String Public Designation As String

---

...
J'instancie un tableau de classes par classe dans ma form principale.

Code:

---

1 2 3

Dim A() As New clsA Dim B() As New clsB Dim C() As New clsC

---

Je ne peux pas déclarer ma variable en Public sinon, j'ai l'erreur suivante:

J'accède sans problème à aux variables de A(), B() et C() dans ma form principales, mais comment puis-je accéder à ces A(), B() et C() dans une autre form?

---

t'as testé les propriétés get et let ?? Dans chaque classe ?

J'ai pas encore essayé ça, je "débute" en VB (je viens de Delphi), alors j'essaye de trouver des solutions équivalentes...

Est-ce que les propriétés sont visibles depuis les différentes form?
Comment puis-je déclarer les propriétés une fois crées pour y accéder de tout mon programme?

En attendant vos informations, je vais jeter un coup d'oeil sur "Let" et "Get"...

Merci!

Citation:

---

Envoyé par Jérôme PRAT

J'ai pas encore essayé ça, je "débute" en VB (je viens de Delphi), alors j'essaye de trouver des solutions équivalentes...

Est-ce que les propriétés sont visibles depuis les différentes form?
Comment puis-je déclarer les propriétés une fois crées pour y accéder de tout mon programme?

En attendant vos informations, je vais jeter un coup d'oeil sur "Let" et "Get"...

Merci!

---

oublie les propriétés get et let, j'avais pas bien lu ton post.
Par contre t'as essayé de créer une fonction public dans ton Form qui retourne ton tableau ?

Citation:

---

Envoyé par shaftJackson

oublie les propriétés get et let, j'avais pas bien lu ton post.
Par contre t'as essayé de créer une fonction public dans ton Form qui retourne ton tableau ?

---

Je vais tenter ça et je te tiens au courant...
Merci!

Bon, j'ai créé une fonction qui copie retourne clsA

Code:

---

1 2 3

Public Function SetclsA() As clsA SetclsA = clsA End Function

---

J'ai une erreur

Citation:

---

Runtime error '28':

Out of stack space

---

Une idée?

Citation:

---

Envoyé par Jérôme PRAT

Je vais tenter ça et je te tiens au courant...
Merci!

Bon, j'ai créé une fonction qui copie retourne clsA

Code:

---

1 2 3

Public Function SetclsA() As clsA SetclsA = clsA End Function

---

J'ai une erreur


Une idée?

---

Tu cherche à faire quoi exactement avec ce code ??

Je ne vois pas encore la finalité du code, mais je crois qu'il ne serait pas non plus inutile de jeter un oeil sur les collections qui remplacent souvent avantageusement les tableaux.

Pour résumer mon application:
Dans une base de données, j'ai plusieurs tables.
Chaque table contient plus ou moins de champs et plus ou moins d'enregistrements.
Au démarrage de l'application, je souhaite charger pour chaque table, une liste contenant tous les champs (c'est pour cela que je voulais utiliser une classe) et tous les enregistrements (de là est venu l'idée du tableau de classe).

For TableA

Citation:

---

clsA(0)
Champ1=1
Champ2=A
Champ3=R1

clsA(1)
Champ1=1
Champ2=D
Champ3=R2

clsA(2)
Champ1=2
Champ2=T
Champ3=F0

---

For TableB

Citation:

---

clsB(0)
ChampA=Z
ChampB=5

clsB(1)
ChampA=U
ChampB=0

clsB(2)
ChampA=R
ChampB=4

---

...

L'avantage de la classe, c'est que je peux avoir n'importe quel type de données à l'intérieur.
Existe t'il un moyen de créer un type "utilisateur", un enregistrement (record dans Delphi pour ceux qui connaitraient aussi Delphi)...
Peut-être devrais-je faire autrement...
Merci de comenter!

Es-tu absolument obligé de faire du vb6 ?
Parce que si tu regardes le dataset de ADO.NET, tu vas voir que ça réponds plutôt pas mal à ton besoin.
Sachant que VB2005 est gratuit en version express, pourquoi s'en priver ?

Ceci dit, et pour commenter, je maintiens que tu devrais passer par des collections, et non des tableaux. Désolé de ne pas donner d'exemple, c'est un vaste sujet, mais il existe plein de bon tutos.

En gros, tu te fais une classe A, puis une collection de classes A.
Une classe B et une collection de classes B.

Tu peux même regrouper le tout : une collection contenant la collection A et la collection B. Etc...

Pour ce qui est des classes et de la versatilité des types, tu as raison.

En parcourant le forum, j'ai vu qu'on peut déclarer des types...
Je pourrai donc créer un tableau de mes types...
Désolé, j'adore les tableaux... (je ne compends pas bien les collections en fait) et j'y jeterai un coup d'oeil plus tard... Ca me plait bien le principe des collections de classes quand même...

Merci pour les réponses :ccool:

PS: Pour VB6, c'est juste imposé :cry:

Edit:
Les types sont aussi ne sont pas utilisables en Public...
Je tourne en rond... Alors je vais me tourner vers les collection...
A suivre!