- Maak een console-applicatie die vraagt om een getal. Maak daarna het scherm schoon. Geef vervolgens de tafel van dit getal met een koptekst er boven. Bijv. getal is 6. Op basisscholen is er veel vraag naar deze applicatie.
Tafel van 6:
=========
1 * 6 = 6
2 * 6 = 12
3 * 6 = 18
...
...
10 * 6 = 60
Voor deze vraag heb ik het volgende gemaakt:
Module Module1
Maar wanneer ik het programma laat lopen, krijg ik hetvolgende:

Hij loopt dus zegmaar 1 achter... hoe krijg ik dit gelijk?
Alvast bedankt!
Groeten Arend
Tafel van 6:
=========
1 * 6 = 6
2 * 6 = 12
3 * 6 = 18
...
...
10 * 6 = 60
Voor deze vraag heb ik het volgende gemaakt:
Module Module1
Code:
Sub Main()
Dim getal As Integer
Dim keer As Integer
Dim antwoord As Integer = getal * keer
Console.WriteLine("Geef getal")
getal = Console.ReadLine
Console.Clear()
Do While keer < 11
Console.WriteLine("De tafel van " & getal)
Console.WriteLine(keer & "* " & getal & "=" & antwoord)
antwoord = getal * keer
keer = keer + 1
Loop
antwoord = Console.ReadLine
End Sub
End Module
Maar wanneer ik het programma laat lopen, krijg ik hetvolgende:

Hij loopt dus zegmaar 1 achter... hoe krijg ik dit gelijk?
Alvast bedankt!
Groeten Arend
Laatst bewerkt door een moderator: