Toon posts:

[VB 6.0]

Pagina: 1
Acties:
  • 42 views sinds 30-01-2008

Verwijderd

Topicstarter
Vraagje:
Ik wil uit een aantal ingevoerde getallen het maximale getal in een string hebben.

Bestaat daar een speciale functie voor?

[ Voor 9% gewijzigd door Verwijderd op 14-09-2003 14:45 ]


  • gorgi_19
  • Registratie: Mei 2002
  • Laatst online: 20-08 11:40

gorgi_19

Kruimeltjes zijn weer op :9

Doel je nu gewoon op de Max() en Min() functies, en dan vervolgens alle items in een strings langslopen?

[ Voor 37% gewijzigd door gorgi_19 op 14-09-2003 14:46 ]

Digitaal onderwijsmateriaal, leermateriaal voor hbo


Verwijderd

Topicstarter
ok hier is de code:
Aantal = InputBox("Voer aantal te meten mensen in", "Gegevens invoeren")

Teller = 1

Do While Teller <= Aantal
Lengte = InputBox("Voer " & CStr(Teller) & "e getal in...", "Invoer")
Zoals je ziet wil ik nu bijv het maximale getal in een string hebben? hoe doe ik dat?

[ Voor 15% gewijzigd door Verwijderd op 14-09-2003 14:51 ]


  • gorgi_19
  • Registratie: Mei 2002
  • Laatst online: 20-08 11:40

gorgi_19

Kruimeltjes zijn weer op :9

code:
1
2
3
4
5
HoogsteGetal = 0

Voor ieder karakter in InputSting
    Als Hoogstegetal < karakter Dan Hoogstegetal = karakter
volgende

Digitaal onderwijsmateriaal, leermateriaal voor hbo


Verwijderd

Topicstarter
hier snap ik weinig van, heb niet zoveel ervaring :)

  • gorgi_19
  • Registratie: Mei 2002
  • Laatst online: 20-08 11:40

gorgi_19

Kruimeltjes zijn weer op :9

Verwijderd schreef op 14 September 2003 @ 14:53:
hier snap ik weinig van, heb niet zoveel ervaring :)
Da's pseudocode; mag je zelf naar VB6 vertalen.. :)
Ik geef alleen het te gebruiken algoritme. :)

Digitaal onderwijsmateriaal, leermateriaal voor hbo


Verwijderd

Topicstarter
kun je het niet gewoon in vb geven?

ik kan wel dit doen?

If (Lengte > Max) Then
Max = Lengte
End If

maar dan kom ik in de knoop met minimale getal.,..

[ Voor 65% gewijzigd door Verwijderd op 14-09-2003 14:57 ]


  • gorgi_19
  • Registratie: Mei 2002
  • Laatst online: 20-08 11:40

gorgi_19

Kruimeltjes zijn weer op :9

Verwijderd schreef op 14 September 2003 @ 14:55:
kun je het niet gewoon in vb geven?
Nee, daar leer je niets van.. :)
Ik ga geen antwoord voorkauwen. :)
If (Lengte > Max) Then
Max = Lengte
End If
Dan herhaal je hetzelfde principe voor het minimale.

[ Voor 23% gewijzigd door gorgi_19 op 14-09-2003 14:58 ]

Digitaal onderwijsmateriaal, leermateriaal voor hbo


Verwijderd

Topicstarter
gorgi_19 schreef op 14 september 2003 @ 14:57:
[...]

Nee, daar leer je niets van.. :)
Ik ga geen antwoord voorkauwen. :)
ik kan wel dit doen?

If (Lengte > Max) Then
Max = Lengte
End If

maar dan kom ik in de knoop met minimale getal.,..

  • gorgi_19
  • Registratie: Mei 2002
  • Laatst online: 20-08 11:40

gorgi_19

Kruimeltjes zijn weer op :9

Er is geen verband tussen de lengte van een string en het hoogste getal, welke het representeert.

Digitaal onderwijsmateriaal, leermateriaal voor hbo


Verwijderd

Topicstarter
gorgi_19 schreef op 14 September 2003 @ 14:57:

Dan herhaal je hetzelfde principe voor het minimale.
maar dan komt er 0 uit :S

dus hoe kan ik het dan oplossen?

[ Voor 10% gewijzigd door Verwijderd op 14-09-2003 15:00 ]


  • gorgi_19
  • Registratie: Mei 2002
  • Laatst online: 20-08 11:40

gorgi_19

Kruimeltjes zijn weer op :9

gorgi_19 schreef op 14 September 2003 @ 14:59:
Er is geen verband tussen de lengte van een string en het hoogste getal, welke het representeert.

Digitaal onderwijsmateriaal, leermateriaal voor hbo


Verwijderd

Topicstarter
word een beetje zootje, :D

hoe kan ik het dan oplossen?

[ Voor 3% gewijzigd door Verwijderd op 14-09-2003 15:01 ]


  • .oisyn
  • Registratie: September 2000
  • Laatst online: 04:06

.oisyn

Moderator Devschuur®

Demotivational Speaker

Kom op, dit is wel heel erg basic. Ik kan je aanraden een goed VB boek te kopen, want we kunnen je nu wel helpen door jou de juiste code te geven, maar dan leer je er alsnog niets van en zit je bij het volgende probleem weer vast.

Give a man a game and he'll have fun for a day. Teach a man to make games and he'll never have fun again.

Pagina: 1

Dit topic is gesloten.