1,对于webList里面用随机数列得到和设置选择的值
rowcount=window("Flight Reservation").Dialog("Flights Table").WinList("From").GetItemsCount
msgbox "得到的list个数"&rowcount
randomize
randnum=int(rowcount*rnd)
window("Flight Reservation").Dialog("Flights Table").WinList("From").Select randnum
msgbox "系统选择的项"&window("Flight Reservation").Dialog("Flights Table").WinList("From").GetSelection