QTP 中weblist的select问题

nihaoyijing

以下是新建的窗口：

Public  Function WriteValue (page,elementType,i,val)
   If  elementType = "WebEdit" Then
       Set oDesc = Description.Create()
       oDesc("micclass").value="WebEdit"
       Set we=Browser("Browser").Page(page).Frame("iframe1").ChildObjects(oDesc)
       we(i).set val
       Set we=Browser("Browser").Page(page).Frame("iframe1").ChildObjects(oDesc)
   End If
      If  elementType = "WebList" Then
       Set oDesc = Description.Create()
       oDesc("micclass").value="WebList"
       Set we=Browser("Browser").Page(page).Frame("iframe1").ChildObjects(oDesc)
     we(i).select "#"&val
   End If
End Function

------------------------------------
'新建科室
Call WriteValue("Page_3","WebEdit",1,"测试")
wait 3
Call WriteValue("Page_3","WebEdit",2,"测试")
wait 3
Call WriteValue("Page_3","WebList",0,0)        -------------运行到这一行时，提示
we(i).select "#"&val 有问题，请问我应该怎么改，是改这个call语句，还是改we(i).select "#"&val
其实最简单的方便，我可以将Call WriteValue("Page_3","WebList",0,0)   改为：Browser("Browser").Page("Page_3").Frame("iframe1").WebList("ctl00$MainContent$ddlHostCode").Select "中医院"
但是我想通过函数的形式怎么样修改呀

nihaoyijing

回复 3# SexyCat_1113


    请问我具体应该怎么改呢？

SexyCat_1113

回复 2# lgh75560
#+数字是选index，，，

lgh75560

不用#的吧
Selecet 数字  就行了