Omgekeerde piramide

[zettekakkers]

Dit is mijn code voor
Dim intTeller1 As Integer
Dim intTeller2 As Integer

txtResultaat.Text = String.Empty

For intTeller1 = 1 To Integer.Parse(txtStartwaarde.Text)
'Iteratie om het aantal symbolen per lijn te bepalen

For intTeller2 = 1 To intTeller1
txtResultaat.Text &= txtSymbool.Text
Next

'Nieuwe lijn
txtResultaat.Text &= Environment.NewLine
Next
Dan bekom je dit (startwaarde: 7, symbool:*)
*
**
***
****
*****
******
*******
maar echter wil ik het zo hebben
*******
******
*****
****
***
**
*

ik heb al geprobeerd de " 1 To Integer.Parse(txtStartwaarde.Text)" om te draaien en ook " 1 To intTeller1"
maar dan gebeurd er totaal niets
wat ben ik toch een knoeier :s

 

[Westerland]

vb is niet mijn ding maar ik zal een poging doen.

ipv 1 tot de startwaarde te tellen moet je simpelweg van startwaarde tot 1 itereren

met deze link moet je er wel uit kunnen komen

http://msdn.microsoft.com/en-us/library/5z06z1kb.aspx

kijk vooral naar het Step gedeelte daar zul je dus -1 moeten hebben voor het aftellen

ps.

Google is your friend =) simpele zoekactie van: vb for loop count down en je hebt je antwoord

 

[krolik]

Het zou ongeveer als volgt moeten worden:

For intTeller1 = Integer.Parse(txtStartwaarde.Text) to 1 step -1
'Iteratie om het aantal symbolen per lijn te bepalen

 

[zettekakkers]

Het zou ongeveer als volgt moeten worden:

For intTeller1 = Integer.Parse(txtStartwaarde.Text) to 1 step -1
'Iteratie om het aantal symbolen per lijn te bepalen

wow dat was gemakkelijk en ik maar zoeken wat er fout ging
jij kunt gewoon toveren
bedankt
:thumb:

 

[krolik]

Graag gedaan.
Dat is gewoon in een for...next loop terugtellen tot b.v. 1, evt met step -1.