dim i as Integer=0dim container as new collectionwhile i=10container.add("Item"+i,i) 'Here second parameter(Key) cannot be a duplicate onei=1+1end while
dropdownlist1.datasource=container 'Assuming 'dropdownlist1' is your dropdown listdropdownlist1.databind()