Import WebBrowser
Import UiElement
Dim arrayData = ""
Dim objExcelWorkBook = ""
Dim hWeb = ""
Dim sRet = ""
Dim data = ""
Dim bRet = ""
Dim fun = ''' function (){
return "123"
'''
hWeb = WebBrowser.BindBrowser("chrome",10000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200})
sRet = WebBrowser.RunJS(hWeb,'''
function(){
var js = document.querySelectorAll(".ui-equal-cell-inner").length
alert(js)
return js
}''',True,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200})
TracePrint(sRet)