If Statement

This is just a logical question but i want to explain what i am doing hoping that it may heIp you understand my problem.

 

I am using Microsoft.Web.Administration to create NEW websites programatically.

I need to change all ID's starting from zero? Currently i have about 100 websites and they are ordered like following:



1, 2, 4, 18, 200, 1234, 232324, 2455344 etc. etc.

And i want them ordered like this: 1, 2, 3, 4, 5, 6, 7, ... etc. up to 100.

I have this code but for some reason it won't work as expected:

 
Dim intList As List(Of Integer) = New List(Of Integer)

For Each site As Site In sites
intList.Add(sit ...