Nestede objekter i Class Modules

Hvad er dit spørgsmål?

Den eneste måde jeg indtil nu har kunne tilgå et \"objekt i et objekt\" er ved at lave en \"property get\" der returnerer et object.
Jeg sætter så et midlertidigt object lig det returnerede og kan så arbejde på det midlertidige.
Når jeg er færdig med det sender jeg så det midlertidige object retur til en property set.
Dette synes en smule unødvendigt. Man burde kunne tilgå objektet direkte med flere dot\'s...

test1_virker er den måde jeg har gjort det på hidtil. test1_skal_virke er den måde jeg gerne vil kunne få det til at virke på.

sub test1_virker
  set test = new Class1
  dim temprs as recordset

  set temprs = test.pubrs

  msgbox temprs.recordcount
end sub

sub test1_skal_virke
  set test = new Class1
  msgbox test.pubrs.recordcount
end sub


Anybody !??!

lille rettelse :

sub test1_virker
  dim test = new Class1  \'ikke set men dim her...
  dim temprs as recordset

  set temprs = test.pubrs

  msgbox temprs.recordcount
end sub

Hej igen

Nu 200 point...

Hvis du laver en funktion, der hedder pubrs, der returnerer det recordset, der skal bruges kan det lade sige gøre ved at bruge dot\'s som du selv kalder det!

Altså

Private TheRecordSet as New RecordSet

Public Function pubrs() as RecordSet
  Set pubrs = TheRecordSet
End Function

Så kan du der hvor du bruger objektet gøre følgende!

Dim test = new Class1
MsgBox test.pubrs.recordcount


Det virker! Det er sikkert og vist!

Hmmm.... dummeslag til mig... damn. Jeg har returneret as object... skulle natuligvis være as \"det aktuelle object\" jeg nu engang havde gang i... for pokker

Jeg vil ikke kode mere, suk.  ;)

nå, men tak.
  Morten

For resten!!

Det ville faktisk også virke hvis du returnerede as Object!

Forskellen er bare at hvis du gør det på denne måde foregår, der det, der hedder lata binding, hvilket både gør det hele en smule langsommere, da selve linkningen først sker runtime, og også gør at du ikke design time kan se hvilke properties og metoder objektet har! Men jeg garanterer dig at det også virker med as Object!


Nikolaj