QTP测试百度搜索框，关键字下拉列表框。
'测试百度输入关键字搜索框, 下拉列表Browser("name:=百度一下，你就知道").Page("title:=百度一下，你就知道").Sync'Setting.WebPackage("ReplayType") = 2 '设置回放按鼠标事件，好像没效果会失败。 不知道咋回事忘高手指点， 个人觉得如果采用的录制方式的话应该有用。Browser("name:=百度一下，你就知道").Page("title:=百度一下，你就知道").WebEdit("name:=wd").Set "qtp"wait 2 '暂停2秒,等待下拉框出现'Setting.WebPackage("ReplayType") = 1Set oDesc = Description.Create()oDesc("micClass").Value = "WebElement"oDesc("html tag").Value = "TD"set oWebElement = Browser("name:=百度一下，你就知道").Page("title:=百度一下，你就知道").WebTable("name:=WebTable").ChildObjects(oDesc)msgbox oWebElement.count For i = 0 To oWebElement.count - 1print i & oWebElement(i).Object.innertext'输出所有 WebElement str = oWebElement(i).Object.innertextIf str = "qtp教程" ThenoWebElement(i).ClickExit For End IfNext