Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Function Sorteer(iBron)
iAantal = UBound(iBron)
For i = 0 To iAantal - 1
For j = 0 To iAantal - i - 1
If iBron(j) > iBron(j + 1) Then
t = iBron(j)
iBron(j) = iBron(j + 1)
iBron(j + 1) = t
End If
Next
Next
Sorteren = iBron
End Function
iGetallen=Sorteer(iGetallen)
Hoe doeje dat in vb.net ?
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.