_Fabien
Messages postés119Date d'inscriptionvendredi 17 novembre 2006StatutMembreDernière intervention28 avril 2008
-
31 janv. 2007 à 10:42
cs_Willi
Messages postés2375Date d'inscriptionjeudi 12 juillet 2001StatutModérateurDernière intervention15 décembre 2018
-
2 févr. 2007 à 12:16
Bonjour,
J'aimerais savoir comment fait-on pour inclure un tableau dans une bibliothèque de classe. J'ai trouvé une solution qui marche, mais qui me semble du domaine du bricolage :
Public Class ClassA
Private _num_id As Byte
Private _nom As String
Private _nb_villes as Byte
Public t_villes() As ville
Public Property num_id () As Byte
Get
return _num_id
End Get
Set (ByVal value As Byte)
If value >0 Then
_num_id = value
Else
throw (new Exception ("Valeur négative !"))
End If
End Set
End Property
(etc)
Public Sub New (ByVal num_id As Byte, ByVal nom As String, byval nb_villes as Byte)
Me._num_id = num_id
Me._nom = nom
Me._nb_villes = nb_villes
ReDim t_villes(Me._nb_villes)
End Sub
End Class
Voici ce que j'aimerais, mais ça ne marche pas :
Private _num_id As Byte
Private _nom As String
Private _nb_villes as Byte
Private _t_villes() As ville
(...)
' Plante !
Public Property t_villes() As Ville
Get
(...)
End Get
Set (ByVal value() As Ville)
(...)
End Set
End Property
Public Sub New (ByVal num_id As Byte, ByVal nom As String, byval nb_villes as Byte, byval t_villes as Ville)
Me._num_id = num_id
Me._nom = nom
Me._nb_villes = nb_villes
Array.copy (Me._t_villes, t_villes, nb_villes)
End Sub
cs_Willi
Messages postés2375Date d'inscriptionjeudi 12 juillet 2001StatutModérateurDernière intervention15 décembre 201822 31 janv. 2007 à 12:10
Bonjour,
Ce n'est pas du tout du bricolage, ce que tu fais est correct.
Néanmois si tu veux garder ta variable _t_villes privée tu peux utiliser une méthode qui recoit un tableau de Ville.
Par exemple:
public sub GetVilles(tab as Ville())
_t_villes=tab
end sub
cs_Willi
Messages postés2375Date d'inscriptionjeudi 12 juillet 2001StatutModérateurDernière intervention15 décembre 201822 2 févr. 2007 à 12:16
Rien ne t'empeche d'avoir une propriété d'un tableau quelquonque.
Quand tu dis que cela plante quand tu mets en place une telle propriété, quel message d'erreur as-tu ?