网址发出来看看

https://exam.weirenzheng.cn//GeneralTestPaper/Testing/c0da7157e5bf48c8ae45acfe012947d8?uid=GXUST_2A9B699D4F7DDFF1
不知道你要不要登录我注销了账户也能打开  

excel做好表，答案按顺序保存好
运行前选中第一题A
利用键盘选择+切换，判断+循环，1分钟搞定

元素id没规律，处理比较麻烦

风风风 https://exam.weirenzheng.cn//GeneralTestPaper/Testing/c0da7157e5bf48c8ae45acfe012947d8?uid=GXUST_2A9 ...

题库咧

//谷歌浏览器，自己抓取各个模块ABCD的4个元素用idx控制，根据答案判断点击哪个选项

Dim sRet = ""
Dim bRet = ""

For i=0 To 89
       
       #icon("@res:gnlu3n2j-rtod-mafr-a00m-gt3rl2agkip0.png")
       Mouse.Action({"wnd":[{"cls":"Chrome_WidgetWin_1","title":"*","app":"chrome"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":[{"tag":"LABEL","aaname":"                     B                 ","idx":i}]},"left","click",10000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"uia","bMoveSmoothly":False})
       
Next

//91-95
For i=0 To 4
       #icon("@res:u19d3tit-98bf-aepg-iqbd-rbsahn6ul5dv.png")
       
       Mouse.Action({"wnd":[{"cls":"Chrome_WidgetWin_1","title":"*","app":"chrome"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":[{"tag":"LABEL","parentid":"qctt-da76383242bf41788f24acfe012975f2-91","aaname":"                         C                     ","idx":i}]},"left","click",10000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"message","bMoveSmoothly":False})
       
Next

//96-100 后面自己抓一下元素，加一个idx用循环的i来遍历控制
For i=0 To 4
       #icon("@res:mnp70365-7bv5-tq27-dv5f-h33vtvq6bdha.png")
       Mouse.Action({"wnd":[{"cls":"Chrome_WidgetWin_1","title":"*","app":"chrome"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":[{"tag":"LABEL","parentid":"qctt-c2ac75d4305e4824b05bacfe012976d6-96","aaname":"                         B                     ","idx":i}]},"left","click",10000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"message","bMoveSmoothly":False})
       
Next

王榕星 //谷歌浏览器，自己抓取各个模块ABCD的4个元素用idx控制，根据答案判断点击哪个选项 Dim sRet = "" Dim bRet = "" ...

老本能不能通俗的解释一下这个代码什么意思啊嘿嘿，这个小弟新人一个不太看的懂（糗大了）

瞌睡蟲子 题库咧

https://exam.weirenzheng.cn//GeneralTestPaper/TPParse?id=c56fe7e68d0247268587ad2c00d3259b&uid=GXUST_2A9B699D4F7DDFF1
不好意思啊兄嘚这两天搬砖挖厕所加班有点晚没上来看  今天总算帮业主搞完了

luenng excel做好表，答案按顺序保存好 运行前选中第一题A 利用键盘选择+切换，判断+循环，1分钟搞定 元素id没规律，处理比较麻烦

这个我会啊如果我是做来卖给同学我早就加班做了，这样木偶式的脚本我觉得失去了解放双手的意义所以没写

风风风 老本能不能通俗的解释一下这个代码什么意思啊嘿嘿，这个小弟新人一个不太看的懂（糗大了）

答一题，点下一题，循环点击ocr范围中的文字，做个变量，每次变量＋1，第一次他就会点击1，第二次点击第二题，第三次点击第三题，你循环120题就好，如果每道题的答案顺序一致的话，你完成可以在点击第一题后，获取题名，去ex表做一个volook公式，几万个题库都可以一秒匹配的

王榕星

         大佬求助一下 
  我那个答案搞了一天已经做好了套进去了，就是到你说的那步我是遍历数组套进去的，你说的那个方法我不怎么会弄我就历遍数组套进去了。
     然后写完发现点击目标一直再第一题点不会往下一题。我就把你的代码看了下也不懂啥意思死套那个idx进去直接报错。
  请问下大佬用什么指令让他点下一题啊。
而且我发现获取元素文本和入口处的抓取数据功能有些不同，抓取数据会点击两个相同级的元素然后循环抓去。而获取文本只能获取单个也不会循环往下获取。
  我特想知道循环往下点击获取这种命令怎么弄好迷茫啊紫猫的教程又没有教。

Dim objJSON = ""
Dim bRet = ""
Dim sRet = ""
sRet = File.Read("C:\\Users\\TG-Z\\Desktop\\英语答案.txt","auto")
objJSON = JSON.Parse(sRet)
bRet = IsArray(objJSON)
For Each value In objJSON
       Dim ii=0
       If value="A"
               
               #icon("@res:gk7mstnh-grv6-0scq-2f1i-47hvq532le5r.png")
               Mouse.Action({"wnd":[{"cls":"Chrome_WidgetWin_1","title":"*","app":"chrome"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":[{"tag":"LABEL","idx":ii}]},"left","click",10000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"simulate","bMoveSmoothly":False})
               ii+1
       Else
               
               If value="B"
                       
                       #icon("@res:pusg896r-ksi3-r6dh-uglu-3b3hi8gjop0v.png")
                       Mouse.Action({"wnd":[{"cls":"Chrome_WidgetWin_1","title":"*","app":"chrome"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":[{"tag":"LABEL","aaname":"                     B                 ","idx":i}]},"left","click",10000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"simulate","bMoveSmoothly":False})
                       ii+1
               Else
                       
                       If value="C"
                               #icon("@res:vhssufts-o44a-m5dh-u1f3-mo88h3vsvf3q.png")
                               Mouse.Action({"wnd":[{"cls":"Chrome_WidgetWin_1","title":"*","app":"chrome"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":[{"tag":"LABEL","aaname":"                     C                 ","idx":ii}]},"left","click",10000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"simulate","bMoveSmoothly":False})
                               ii+1
                       Else
                               If value="D"
                                       #icon("@res:vhssufts-o44a-m5dh-u1f3-mo88h3vsvf3q.png")
                                       Mouse.Action({"wnd":[{"cls":"Chrome_WidgetWin_1","title":"*","app":"chrome"},{"cls":"Chrome_RenderWidgetHostHWND","title":"Chrome Legacy Window"}],"html":[{"tag":"LABEL","aaname":"                     D                 ","idx":ii}]},"left","click",10000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200,"bSetForeground":True,"sCursorPosition":"Center","iCursorOffsetX":0,"iCursorOffsetY":0,"sKeyModifiers":[],"sSimulate":"simulate","bMoveSmoothly":False})
                                       ii+1
                               Else
                                       
                               End If
                               
                       End If
               End If
       End If
Next



[23:32:34]流程块1.task 第14行：第4个字符：应该出现以下内容 '{<EOF>, '\r', ':', '\n'}'
[23:32:34]流程块1.task 第21行：第5个字符：应该出现以下内容 '{<EOF>, '\r', ':', '\n'}'
[23:32:34]流程块1.task 第27行：第6个字符：应该出现以下内容 '{<EOF>, '\r', ':', '\n'}'
[23:32:34]流程块1.task 第32行：第7个字符：应该出现以下内容 '{<EOF>, '\r', ':', '\n'}'

hWeb = WebBrowser.BindBrowser("chrome",10000,{"bContinueOnError":False,"iDelayAfter":300,"iDelayBefore":200})
arrayRet = [ [ "题1答案", 1.0 ], [ "题2答案", 2.0 ], [ "题3答案", 3.0 ], [ "题4答案", 1.0 ], [ "题5答案", 2.0 ], [ "题6答案", 3.0 ], [ "题7答案", 1.0 ], [ "题8答案", 2.0 ], [ "题9答案", 3.0 ], [ "题10答案", 1.0 ], [ "题11答案", 2.0 ], [ "题12答案", 3.0 ], [ "题13答案", 1.0 ], [ "题14答案", 2.0 ], [ "题15答案", 3.0 ], [ "题16答案", 1.0 ], [ "题17答案", 2.0 ], [ "题18答案", 3.0 ], [ "题19答案", 1.0 ], [ "题20答案", 2.0 ], [ "题21答案", 3.0 ], [ "题22答案", 1.0 ], [ "题23答案", 2.0 ], [ "题24答案", 3.0 ], [ "题25答案", 1.0 ], [ "题26答案", 2.0 ], [ "题27答案", 3.0 ], [ "题28答案", 1.0 ], [ "题29答案", 2.0 ], [ "题30答案", 3.0 ], [ "题31答案", 1.0 ], [ "题32答案", 2.0 ], [ "题33答案", 3.0 ], [ "题34答案", 1.0 ], [ "题35答案", 2.0 ], [ "题36答案", 3.0 ], [ "题37答案", 1.0 ], [ "题38答案", 2.0 ], [ "题39答案", 3.0 ], [ "题40答案", 1.0 ], [ "题41答案", 2.0 ], [ "题42答案", 3.0 ], [ "题43答案", 1.0 ], [ "题44答案", 2.0 ], [ "题45答案", 3.0 ], [ "题46答案", 1.0 ], [ "题47答案", 2.0 ], [ "题48答案", 3.0 ], [ "题49答案", 1.0 ], [ "题50答案", 2.0 ], [ "题51答案", 3.0 ], [ "题52答案", 1.0 ], [ "题53答案", 2.0 ], [ "题54答案", 3.0 ], [ "题55答案", 1.0 ], [ "题56答案", 2.0 ], [ "题57答案", 3.0 ], [ "题58答案", 1.0 ], [ "题59答案", 2.0 ], [ "题60答案", 3.0 ], [ "题61答案", 1.0 ], [ "题62答案", 2.0 ], [ "题63答案", 3.0 ], [ "题64答案", 1.0 ], [ "题65答案", 2.0 ], [ "题66答案", 3.0 ], [ "题67答案", 1.0 ], [ "题68答案", 2.0 ], [ "题69答案", 3.0 ], [ "题70答案", 1.0 ], [ "题71答案", 2.0 ], [ "题72答案", 3.0 ], [ "题73答案", 1.0 ], [ "题74答案", 2.0 ], [ "题75答案", 3.0 ], [ "题76答案", 1.0 ], [ "题77答案", 2.0 ], [ "题78答案", 3.0 ], [ "题79答案", 1.0 ], [ "题80答案", 2.0 ], [ "题81答案", 3.0 ], [ "题82答案", 1.0 ], [ "题83答案", 2.0 ], [ "题84答案", 3.0 ], [ "题85答案", 1.0 ], [ "题86答案", 2.0 ], [ "题87答案", 3.0 ], [ "题88答案", 1.0 ], [ "题89答案", 2.0 ], [ "题90答案", 3.0 ], [ "题91答案", 1.0 ], [ "题92答案", 2.0 ], [ "题93答案", 3.0 ], [ "题94答案", 1.0 ], [ "题95答案", 2.0 ], [ "题96答案", 3.0 ], [ "题97答案", 1.0 ], [ "题98答案", 2.0 ], [ "题99答案", 3.0 ], [ "题100答案", 1.0 ], [ "题101答案", 2.0 ], [ "题102答案", 3.0 ], [ "题103答案", 1.0 ], [ "题104答案", 2.0 ], [ "题105答案", 3.0 ], [ "题106答案", 1.0 ], [ "题107答案", 2.0 ], [ "题108答案", 3.0 ], [ "题109答案", 1.0 ], [ "题110答案", 2.0 ], [ "题111答案", 3.0 ], [ "题112答案", 1.0 ], [ "题113答案", 2.0 ], [ "题114答案", 3.0 ], [ "题115答案", 1.0 ], [ "题116答案", 2.0 ], [ "题117答案", 3.0 ], [ "题118答案", 1.0 ], [ "题119答案", 2.0 ], [ "题120答案", 3.0 ] ]
For i = 0 To UBound(arrayRet) Step 1 
       // TracePrint arrayRet[i][1]
       arrayRet[i][1] = CInt(arrayRet[i][1])
       sRet = WebBrowser.RunJS(hWeb,'''
function(){document.querySelectorAll(" div > div.choice > label:nth-child('''&arrayRet[i][1]&''') > input[type=radio]")['''&i&'].click()
return 123
}',True,{"bContinueOnError":False,"iDelayAfter":0,"iDelayBefore":0})
Next
答案自己改二维数组内容，题目不变按顺序撸

建一个excel，A1列把1到90的答案提前写好，后面有些题目没有D选项，所以我测试都是用ABCABC到90，然后读取表格把下面的代码放进去运行就可以了