angle-ying 发表于 2010-3-15 21:54:57

QTP自带flight系统中关于随机选择航班的问题

在随机选择航班里 代码如下
'随机选择航班'
Randomize
Dim suiji
suiji=int(4*rnd)
Select Case suiji
Case 0
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").WebRadioGroup("outFlight").Select "Blue Skies Airlines$360$270$5:03"
Case 1
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").WebRadioGroup("outFlight").Select "Blue Skies Airlines$361$271$7:10"
Case 2
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").WebRadioGroup("outFlight").Select "Pangea Airlines$362$274$9:17"
Case 3
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").WebRadioGroup("outFlight").Select "Unified Airlines$363$281$11:24"
End Select
为什么运行时会出错呢 ？大家帮我看看是不是代码的问题啊！Select里的name是一样的 所以选择的是vault的值。大家帮我看看那里错了 还是我的思路就不正确，谢谢各位了

[ 本帖最后由 angle-ying 于 2010-3-15 21:56 编辑 ]

angle-ying 发表于 2010-3-16 09:53:21

谢谢大家啊 给我个答案 迷茫中.................

feiyunkai 发表于 2010-3-16 10:50:36

随即数和Select Case语句没问题，给个截图，看报什么错

angle-ying 发表于 2010-3-16 11:35:08

回复 3# 的帖子

谢谢哈 找到原因了 是因为我自己加的代码没有加对象所以他找不到这个对象会报错 谢谢

zhengpeipei 发表于 2010-3-19 16:09:04

:o
页: [1]
查看完整版本: QTP自带flight系统中关于随机选择航班的问题