🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #5841

Re: Recursie en VB

#5841
From: KrIstOfK
Date: Wed, 05 Feb 2003 22:13
38 lines
1958 bytes
"Christian" <Christian.Rosseel@pandora.be> schreef in bericht
news:vRe0a.32695$Jd.4400@afrodite.telenet-ops.be...
> Dag iedereen,
>
> Ik bestudeer de Recursie in Visual Basic.
> Kan er mij aub iemand uitleggen wat het stuk "Terug(intbedrag - 500)" in
de
> code doet.
> Zijn er personen die goede websites kennen in verband met dit onderwerp,
> liefst in het Nederlands?
> Alvast bedankt,
>
> Christian.
>
>     Function Terug(ByVal intbedrag As Integer) As String
>
>         Dim strTerug As String
>
>         If intbedrag >= 500 Then
>
>             strTerug = "500 " & Terug(intbedrag - 500)
>
>         ElseIf intbedrag >= 200 Then
>
>             strTerug = "200 " & Terug(intbedrag - 200)
>
>         End If
>
>         Return strTerug
>
>     End Function
>
>

niet echt site gevonden, heb je fantastische uitleg gemaild.

KrIstOfK
Technical Details
Message-ID: <b1s2c3$9lr$1@reader10.wxs.nl>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-01!sn-xit-08!supernews.com!easynet-quince!easynet.net!feed1.news.be.easynet.net!skynet.be!skynet.be!213.51.129.3.MISMATCH!newshub1.home.nl!home.nl!news2.euro.net!newsfeed.wxs.nl!textnews.wxs.nl!not-for-mail
References: <vRe0a.32695$Jd.4400@afrodite.telenet-ops.be>

Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,1e4116ed96ae8d16
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2003-02-05 14:16:03 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-01!sn-xit-08!supernews.com!easynet-quince!easynet.net!feed1.news.be.easynet.net!skynet.be!skynet.be!213.51.129.3.MISMATCH!newshub1.home.nl!home.nl!news2.euro.net!newsfeed.wxs.nl!textnews.wxs.nl!not-for-mail
From: "KrIstOfK" <NO.SPAM.dementdevil@hotmail.com>
Newsgroups: be.comp.programming
Subject: Re: Recursie en VB
Date: Wed, 5 Feb 2003 23:13:55 +0100
Organization: Planet Internet
Lines: 40
Message-ID: <b1s2c3$9lr$1@reader10.wxs.nl>
References: <vRe0a.32695$Jd.4400@afrodite.telenet-ops.be>
NNTP-Posting-Host: 81.11.151.53
X-Trace: reader10.wxs.nl 1044483267 9915 81.11.151.53 (5 Feb 2003 22:14:27 GMT)
X-Complaints-To: abuse@planet.nl
NNTP-Posting-Date: 5 Feb 2003 22:14:27 GMT
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1106
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1106