随机数参数化
上一篇 / 下一篇 2008-12-29 15:39:44 / 个人分类：测试路漫漫
不是什么很复杂的东西，记下防止自己忘记的时候无处可查，或查找困难。。。
'以飞机订票为列
'取得航班列表的行数
ItemCount = Window("Flight Reservation").Dialog("Flights Table").WinList("From").GetItemsCount
'随机选取其中一项
SelectItem = RandomNumber(0,ItemCount)
'选择航班
Window("Flight Reservation").Dialog("Flights Table").WinList("From").Select SelectItem
'单击OK按钮确定
Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Click
'以飞机订票为列
'取得航班列表的行数
ItemCount = Window("Flight Reservation").Dialog("Flights Table").WinList("From").GetItemsCount
'随机选取其中一项
SelectItem = RandomNumber(0,ItemCount)
'选择航班
Window("Flight Reservation").Dialog("Flights Table").WinList("From").Select SelectItem
'单击OK按钮确定
Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Click
相关阅读:
- 我的测试工作 (zfylan, 2007-6-18)
- 测试责任问题 (zfylan, 2007-11-16)
- TestComplete Date Driven Testing學習筆記 (zfylan, 2008-6-06)
- TestComplete ExcelDriver從MyEile.xls中讀入Sheet表格 (zfylan, 2008-6-10)
- VBscript脚本语言错误(转) (zfylan, 2008-12-24)
- 控件无法识别（转） (zfylan, 2008-12-24)
TAG: 测试路漫漫
标题搜索
日历
|
|||||||||
| 日 | 一 | 二 | 三 | 四 | 五 | 六 | |||
| 1 | 2 | 3 | 4 | ||||||
| 5 | 6 | 7 | 8 | 9 | 10 | 11 | |||
| 12 | 13 | 14 | 15 | 16 | 17 | 18 | |||
| 19 | 20 | 21 | 22 | 23 | 24 | 25 | |||
| 26 | 27 | 28 | 29 | 30 | 31 | ||||
我的存档
数据统计
- 访问量: 15278
- 日志数: 32
- 建立时间: 2007-06-11
- 更新时间: 2009-02-27
