Comment creer une Classe d'un objet Collection ?
Voici ma classe de Base
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 28 29
| Public Class cArbHier
Private mlngArbHierNumAuto As Long
Private mstrArbHierCode As String
Private mstrArbHierDescription As String
Public Property ArbHierNumAuto() As Long
Get
Return mlngArbHierNumAuto
End Get
Set(ByVal value As Long)
mlngArbHierNumAuto = value
End Set
End Property
Public Property ArbHierCode() As String
Get
Return mstrArbHierCode
End Get
Set(ByVal value As String)
mstrArbHierCode = value
End Set
End Property
Public Property ArbHierDescription() As String
Get
Return mstrArbHierDescription
End Get
Set(ByVal value As String)
mstrArbHierDescription = value
End Set
End Property |
Comment je peux creer une classe ArbHiers qui serait un objet collection qui contient les objets ArbHier ?
Je suis utilisateur VB6 et cette nouvelle organisation me perturbe !