Browser("Find a Flight: Mercury").Page("Find a Flight: Mercury").WebList("fromPort").Select "London"
count = Browser("Find a Flight: Mercury").Page("Find a Flight: Mercury").WebList("fromPort").getroproperty("items count")
itemname = Browser("Find a Flight: Mercury").Page("Find a Flight: Mercury").WebList("fromPort").GetItem(4)
msgbox itemname
Browser("Find a Flight: Mercury").Page("Find a Flight: Mercury").WebList("fromPort").Select itemname
可以设定随机数 随机选择