🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: be.comp.programming
3 messages
3 total messages Started by Christian Sun, 05 Jan 2003 17:07
Visual Basic en Arrays
#6180
Author: Christian
Date: Sun, 05 Jan 2003 17:07
11 lines
1421 bytes
Dag iedereen,

Ik zou een onbekend aantal waarden van een gebruiker moeten kunnen opvangen,
dmv een Dynamische Array.
Op deze waarden zou ik dan allerlei berekeningen moeten kunnen uitvoeren.
De elementen opvangen in de Array is nu niet het probleem, maar een
berekening uitvoeren?
Is er iemand die me wat raad kan geven aub?
Alvast bedankt,

Christian.
Re: Visual Basic en Arrays
#6193
Author: Jack D
Date: Tue, 07 Jan 2003 16:29
33 lines
1950 bytes
Christian wrote on 05-01-2003 18:07:

> Dag iedereen,
> 
> Ik zou een onbekend aantal waarden van een gebruiker moeten kunnen opvangen,
> dmv een Dynamische Array.
> Op deze waarden zou ik dan allerlei berekeningen moeten kunnen uitvoeren.
> De elementen opvangen in de Array is nu niet het probleem, maar een
> berekening uitvoeren?
> Is er iemand die me wat raad kan geven aub?
> Alvast bedankt,
> 
> Christian.

Hangt ervan af wat je wil berekenen.

Eenvoudig voorbeeld: de gemiddelde waarde.

(in Pseudo-VB-code, is nogal lang geleden ;) )

dim average as float
average = 0.0
for (I = 0; I < myArray.size(); I++)
    average = average + myArray[I]
next
average = average / myArray.size()

Moest iemand dit in correcte VB-syntax kunnen zetten, ben eens curieus...

Soit, als je iets anders wil berekenen, specifieer het en ik zal mijn best
doen...

Jacko
Re: Visual Basic en Arrays
#6035
Author: Nicolas Barbier
Date: Fri, 10 Jan 2003 20:59
26 lines
1805 bytes
Jack D wrote:

> Moest iemand dit in correcte VB-syntax kunnen zetten, ben eens curieus...

Ok, dit komt van zo een 8-tal jaren geleden ofzo (de tijd dat VB3 nog 
recent was).

> dim average as float
> average = 0.0
> for (I = 0; I < myArray.size(); I++)

for i = lbound(myArray) to ubound(myArray)

' Gokje :-) en ziehier, ik herinner mij tevens het commentaarteken van VB

>     average = average + myArray[I]

average = average + myArray(i)

> next
> average = average / myArray.size()

average = average / (ubound(myArray) - lbound(myArray) + 1)

-- 
Nicolas Barbier
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads