forklaring af kode

Her sidder jeg og arbejder på et lotto program.
Men da det er ret lang tid siden jeg sidst har arbejdet med VB så kom jeg lidt i tvivl mht. følgende funktion/kode( der skal på en lynlottokupon vælges et tal fra 1 til 36 uden at det samme tal bliver valgt 2 gange)
For i = 1 to 36
Fjernkryds (i)
Next i

Do
Randomize
tal = Int (Rnd * 36)+1
If not kryds(tal) Then
Sæt kryds (tal)
End if
If antal = 7 then
Exit Do
End If
Loop
End sub

Håber på simpel forklaring af hele koden, men vigtigst er linien/funktionen der ender med +1