Arrays i kodemoduler og Collections
Jeg benytter VB 5.0. I et class module (VareBestilling) har jeg erklæret følgende variabler:...................................................................................
Private Type VareType1 'user definet type
Vare_nr As Long
Vare_navn As String
Pris As Double
antal As Integer
End Type
Private mlNr As Long 'Bestillingends nummer
Private msNavn As String 'Det unikke navn på bestilling
Private mvVarer() As VareType1 'Array af en user definet type
'Jeg har defineret en Collection (Varebestillinger)
'Denne funktion i VareBestilling 'Adder'et objekt af klassen VareBestilling til Colloction: Varebestillinger
Friend Sub TilfojCol(ByRef col As VareBestillinger)
col.Add mlNr, msNavn, msNavn
'col.Add mlNr, msNavn, mvVarer(), msNavn (Dette ville jeg egentligt have gjort)
End Sub
.....................................................................................
Oprindeligt ville jeg også have 'Addet' mvVarer() , men det virker ikke som om jeg får lov at 'Adde' en nyt objekt af typen
varebestilling til en collection af typen Varebestillinger hvis jeg har et array (mvVarer()) i klassen Varebestilling. Er det fordi man
ikke kan overføre arrays i versioner af VB ældre end 6.0?
Eller er det fordi collection-mudulet VareBestillinger ikke kender min UDT, som er erklæret 'private' i min Klasse VareBestilling?
Er de