Verifying items in combo list / Drop down list

Verifying items in combo list / Drop down list.

Cnt=Browser("Browser").Page("page").WebList("weblist").GetROProperty("items count")
For i=1 to cnt step 1
Browser("Browser").Page("page").WebList("weblist").select (i)
Browser("Browser").Page("page").WebButton("button").Click
Next