Re: VB gegevens op een rijtje (derde en goede proging)

Article View: nl.comp.programmeren

Article #102

Back to nl.comp.programmeren Previous Next

#102

From: Patrick
Date: Sun, 22 Apr 2007 09:38

25 lines
1635 bytes

Om je een beetje op weg te helpen kan je gebruik maken van een 
StringBuilder. Overigens is niet de enige weg die naar 'Rome' gaat.

>          'declaratie variablen + invoer
>
>          Dim SNGgetal As Single
>          ...
>          Dim SNGdeling As Single

Dim sbResultaten As New Text.StringBuilder

>
>          Do While SNGtest > 1
>              SNGdeler = SNGdeler + 1
>              SNGdeling = SNGgetal / SNGdeler
>              SNGtest = SNGgetal / SNGdeler

If SNGdeling = Int(SNGdeling) Then
  strBuilder.AppendLine(SNGdeler)
End If

>
>          Loop

MsgBox(sbResultaten.ToString)

Technical Details

Message-ID: <462b2d2f$0$69886$e4fe514c@news.xs4all.nl>

Path:

arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!proxad.net!news.tele.dk!news.tele.dk!small.news.tele.dk!newsgate.cistron.nl!xs4all!transit3.news.xs4all.nl!post.news.xs4all.nl!not-for-mail

References: <2BsVh.127215$ZW7.859206@phobos.telenet-ops.be>

Show Full Headers

Complete Article Headers

X-Google-Thread: 107324,4eefbb53c7e96621
X-Google-Thread: fcea4,4eefbb53c7e96621
X-Google-Attributes: gid107324,gidfcea4,public
X-Google-Language: DUTCH,ASCII-7-bit
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!proxad.net!news.tele.dk!news.tele.dk!small.news.tele.dk!newsgate.cistron.nl!xs4all!transit3.news.xs4all.nl!post.news.xs4all.nl!not-for-mail
From: "Patrick" <public.usenet@xs4all.nl>
Newsgroups: nl.comp.programmeren,be.comp.programming
References: <2BsVh.127215$ZW7.859206@phobos.telenet-ops.be>
Subject: Re: VB gegevens op een rijtje (derde en goede proging)
Date: Sun, 22 Apr 2007 11:38:44 +0200
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.3028
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.3028
X-RFC2646: Format=Flowed; Response
Lines: 28
Message-ID: <462b2d2f$0$69886$e4fe514c@news.xs4all.nl>
NNTP-Posting-Host: 82.95.238.53
X-Trace: 1177234736 news.xs4all.nl 69886 [::ffff:82.95.238.53]:63355
X-Complaints-To: abuse@xs4all.nl

Reply to Parent Message