求高手指点：利用随机数选择WinList中项时总出现运行错误

ARCHANGEL4

刚开始学习UFT自动化测试，练习 订票系统 测试的过程中总出现如下的运行错误，点击“重试”几次有时候就能往下进行了，麻烦高手指点到底是哪里出现了错误，谢谢！
脚本内容如下：

1. Dim itemCount
   
2. 
   
3. 'Book
   
4. Window("Flight Reservation").WinButton("Button").Click
   
5. Window("Flight Reservation").WinObject("Date of Flight:").Type DataTable("OrderDate", dtLocalSheet)
   
6. Window("Flight Reservation").WinComboBox("Fly From:").Select DataTable("FlyFrom",dtLocalSheet)
   
7. Window("Flight Reservation").WinComboBox("Fly To:").Select DataTable("FlyTo",dtLocalSheet)
   
8. Window("Flight Reservation").WinButton("FLIGHT").Click
   
9. 
   
10. If Window("Flight Reservation").Dialog("Flights Table").WinList("From").Exist Then
    
11.         itemCount = Window("Flight Reservation").Dialog("Flights Table").WinList("From").GetROProperty("items count")
    
12.         Window("Flight Reservation").Dialog("Flights Table").WinList("From").Select RandomNumber(0,itemCount)
    
13.         Window("Flight Reservation").Dialog("Flights Table").WinButton("OK").Click
    
14. End If
    
15. 
    
16. Window("Flight Reservation").WinEdit("Name:").Set DataTable("Name",dtLocalSheet)
    
17. Window("Flight Reservation").WinButton("Insert Order").Click
    
18. Window("Flight Reservation").WinButton("Button_2").Click
    
19. 
    
20. 'Check
    
21. Window("Flight Reservation").Dialog("Open Order").WinCheckBox("Customer Name").Set "ON"
    
22. Window("Flight Reservation").Dialog("Open Order").WinEdit("Edit").Set DataTable("Name",dtLocalSheet)
    
23. Window("Flight Reservation").Dialog("Open Order").WinButton("OK").Click
    
24. itemCount = Window("Flight Reservation").Dialog("Open Order").Dialog("Search Results").WinList("Flight No.").GetROProperty("items count")
    
25. Window("Flight Reservation").Dialog("Open Order").Dialog("Search Results").WinList("Flight No.").Select RandomNumber(0,itemCount)
    
26. Window("Flight Reservation").Dialog("Open Order").Dialog("Search Results").WinButton("OK").Click

复制代码

出错时状态如下：

ARCHANGEL4

没人气啊.. 自己顶一顶

蓝色忧郁38

我不是高手

赵佳乐SMILE

1.确定一下 WinList("Flight No.") 在对象库中
2.确定一下 Window("Flight Reservation").Dialog("Open Order").WinEdit("Edit").Set DataTable("Name",dtLocalSheet) 能取到客户名
3.确定一下订单是存在的

赵佳乐SMILE

简化了一下代码是可以的 跟随机数没关系

1. 
   
2. Window("Flight Reservation").Dialog("Open Order").WinCheckBox("Customer Name").Set "ON"
   
3. Window("Flight Reservation").Dialog("Open Order").WinEdit("Edit").Set("kimi")
   
4. Window("Flight Reservation").Dialog("Open Order").WinButton("OK").Click
   
5. itemCount = Window("Flight Reservation").Dialog("Open Order").Dialog("Search Results").WinList("Flight No.").GetROProperty("items count")
   
6. Window("Flight Reservation").Dialog("Open Order").Dialog("Search Results").WinList("Flight No.").Select RandomNumber(0,itemCount)

复制代码