1 van 1
Programeren vbnet
Geplaatst: di 29 dec 2009, 17:21
door marjan
hoi
Kan iemand me helpen ik vier decimale getallen een lisbox ik moet van de van getallen het gemiddelde maken en het gemiddelde moet getoont woorden in een label
weet iemand hoe ik de vier decimale getallen uit de listbox krijg zodat ik het gemiddelde kan bereken en tonen in een label
hartelijk bedankt voor de hulp
Re: Programeren vbnet
Geplaatst: di 29 dec 2009, 20:34
door Lathander
VB.NET bedoel je?
Ik betwijfel sterk of er hier mensen zitten die dat nog gebruiken.
Re: Programeren vbnet
Geplaatst: wo 30 dec 2009, 11:40
door marjan
Ik bedoel visual basic 2008
Groeten
Re: Programeren vbnet
Geplaatst: do 31 dec 2009, 17:48
door Korot
Volgens mij zijn de waarden van een listbox voor bepaald. Dat wil zeggen: Ergens in het programma staat wat moet worden toegevoegd. Of bedoel je een textbox met meerdere regels? In dat geval moet je de string opsplitsen in meerdere stukjes.
Groet,
Korot
Re: Programeren vbnet
Geplaatst: do 31 dec 2009, 20:02
door Nvt
Volgens mij zijn de waarden van een listbox voor bepaald. Dat wil zeggen: Ergens in het programma staat wat moet worden toegevoegd.
Tenzij je de waarden in de designer van visual studio aan de listbox toevoegt, dan heb je geen code nodig om waarden aan de listbox toe te voegen.
Re: Programeren vbnet
Geplaatst: za 02 jan 2010, 09:29
door Korot
Tenzij je de waarden in de designer van visual studio aan de listbox toevoegt, dan heb je geen code nodig om waarden aan de listbox toe te voegen.
Ok, maar zelfs dan weet je de waarden al die je toevoegt, dus dat gaat niet op.
Groet,
Korot
Re: Programeren vbnet
Geplaatst: za 02 jan 2010, 21:17
door m00se
Als ik je vraag goed begrepen heb moet dit werken:
Code: Selecteer alles
Dim Som as integer
for i = 0 to Listbox1.listcount - 1 'Want eerste item heeft index 0
Som += cint(Listbox1.items(1))
next
Label1.text= cstr(Som/Listbox1.listcount)
Dit is even uit het hoofd, dus weet niet of het 100% is.
Als het werkt, dan werkt het in ieder geval ongeacht het aantal getallen in je listbox (dus niet enkel voor 4).
Re: Programeren vbnet
Geplaatst: za 02 jan 2010, 22:29
door Korot
Code: Selecteer alles
Dim Som as integer
for i = 0 to Listbox1.listcount - 1 'Want eerste item heeft index 0 [color="#008000"]"Moet hier geen '=' teken?[/color]
Som += cint(Listbox1.items(1)) [color="#008000"]"Wat is 'cint'? Een normale 'Var(' doet het toch ook?[/color]
next [color="#008000"]"Mij staat vaag bij dat hier nog een 'i' moet staan.[/color]
Label1.text= cstr(Som/Listbox1.listcount) [color="#008000"]"Wat is 'cstr'? Volgens mij is die hele 'str' niet eens nodig, althans, niet in de VB2008 waar ik mee werk.[/color]
Opmerkingen in het groen.
Groet,
Korot
Re: Programeren vbnet
Geplaatst: za 02 jan 2010, 23:38
door m00se
for i = 0 to Listbox1.listcount - 1 mist geen "="-teken volgens mij
cint = convert to integer
cstr = convert to string
next versus next i: in oude versies van VB moet je next i gebruiken, maar in VB.NET 2008 enkel next (next i kan misschien ook maar dan maakt het in ieder geval niet uit)
Re: Programeren vbnet
Geplaatst: zo 03 jan 2010, 11:28
door Korot
for i = 0 to Listbox1.listcount - 1 mist geen "="-teken volgens mij "Klopt, had het verkeerd begrepen, was in de war met de manier waarop je een programma laat stoppen met regels uit een bestand te lezen: Do Until StreamReader.Peek=-1, mijn fout.
cint = convert to integer "Waarom zou een Var( het hier ook niet doen? Jouw manier kan ook werken, maar ik wist het teken gewoon niet.
cstr = convert to string "Alweer, in mijn versie van VB 2008 heb ik dit teken niet nodig.
Groet,
Korot