Article View: be.comp.programming
Article #11712Re: VB type
From: Pieter Philippaerts
Date: Sat, 19 Jan 2002 14:20
Date: Sat, 19 Jan 2002 14:20
53 lines
2607 bytes
2607 bytes
Aangezien je in VB geen pointers kan gebruiken zoals je dat
in bijvoorbeeld C kan (geen -> in VB, bvb) is het onmogelijk
om in een Type een referentie naar zichzelf te zetten
(anders krijg je een stack overflow).
Je kan je boomstructuur wel simuleren met class files.
Hier is bijvoorbeeld een definities van een klasse clsTest die
referenties naar objecten van hetzelfde type kan hebben:
Option Explicit
Private PrivateObject As clsTest
Public Sub CreateNewPrivateObject()
Set PrivateObject = New clsTest
End Sub
Public Function GetPrivateObject() As clsTest
Set GetPrivateObject = PrivateObject
End Function
Je kan hierop dan bijvoorbeeld devolgende code uitvoeren:
Dim c As New clsTest
c.CreateNewPrivateObject
c.GetPrivateObject.CreateNewPrivateObject
Mvg,
Pieter Philippaerts
http://www.allapi.net/
"[CB]" <cool-b@mp3.ms> wrote in message
news:fcd28.499$6x7.207546615@hebe.telenet-ops.be...
> Hoe kan ik in Visual Basic een type maken met
> daarin nog eens een object van hetzelfde type?
> Ik krijg steeds een 'circular dependencies'-error...
>
> Wat ik wil maken is eigenlijk een soort boomstrucuur.
> Bijv:
>
> Hoofditem
> |
> |-- Subitem
> | |-- Sub-Sub-item ;o)
> | |-- Sub-Sub-item
> | |-- Sub-Sub-item
> |
> |-- Subitem
>
> Met alle items en subitems van hetzelfde type.
> Ik ben nog maar net begonnen met VB, en het
> lukt me niet om zo een structuur te maken :(
>
> bedankt,
>
> [CB]
Technical Details
Message-ID:
<%8f28.23$GG2.10979@news.chello.be>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news.tele.dk!small.news.tele.dk!195.64.68.27!newsgate.cistron.nl!amsnews01.chello.com!news.chello.be!not-for-mailReferences:
<fcd28.499$6x7.207546615@hebe.telenet-ops.be>Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit X-Google-Thread: fcea4,354c99b1dcd3ee01 X-Google-Attributes: gidfcea4,public X-Google-ArrivalTime: 2002-01-19 06:16:36 PST Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news.tele.dk!small.news.tele.dk!195.64.68.27!newsgate.cistron.nl!amsnews01.chello.com!news.chello.be!not-for-mail Reply-To: "Pieter Philippaerts" <Pieter@allapi.net> From: "Pieter Philippaerts" <Pieter@allapi.net> Newsgroups: be.comp.programming References: <fcd28.499$6x7.207546615@hebe.telenet-ops.be> Subject: Re: VB type Lines: 55 Organization: The KPD-Team X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2600.0000 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000 Message-ID: <%8f28.23$GG2.10979@news.chello.be> Date: Sat, 19 Jan 2002 15:20:18 +0100 NNTP-Posting-Host: 195.162.214.182 X-Complaints-To: abuse@chello.be X-Trace: news.chello.be 1011449531 195.162.214.182 (Sat, 19 Jan 2002 15:12:11 MET) NNTP-Posting-Date: Sat, 19 Jan 2002 15:12:11 MET