如何在Visual应用程序中单击壁虎加载的网站[VS2015]

Question

在用Visual (VS2015)编写的HAM无线电应用程序中，我使用VB表单中的壁虎web浏览器。

在我用VB程序(URL = http://websdr.ewi.utwente.nl:8901/)加载到壁虎浏览器的网站上，我想通过我的VB应用程序的软件代码在“CW-窄”旋钮上单击。这个旋钮缩小了这个基于Web的SDR (软件无线电)接收过滤器的范围。

这个旋钮是现场一张桌子的一部分。在用鼠标右键单击CW-窄旋钮(下面的FireBug代码)后，我看到了这一点。

“CW-窄”旋钮在一个表中，我无法从我的VB应用程序中单击这个旋钮。

谁能帮上忙？

注意:我在同一站点上需要的另一个控件，Mute复选框，正在使用下面的VB-代码：

• GWB_SDR1_MyCall是VB窗体上的壁虎浏览器。

Dim MuteCheck As Gecko.DOM.GeckoInputElement =Gecko.DOM.GeckoInputElement Gecko.DOM.GeckoInputElement) MuteCheck.Click()

运行此代码确实会在SDR上静音。

希望有些人能帮我，点击一张桌子上的CW-窄旋钮。(请参阅以下网站的复制粘贴)

<table>
<tbody>
<tr>
<tr>
<td>
<td>
<input type="button" onclick="setmf('cw',-0.78, -0.72);" value="CW-narrow">
</td>
<td>
<td>
<td>
<td>
</tr>
</tbody>
</table>

事先非常感谢！

翁诺·德梅耶尔

Answer 1

试一试

GWB_SDR1_MyCall.Document.QuerySelector("div.ctl:nth-child(32) > table:nth-child(6) > tbody:nth-child(1) > tr:nth-child(2) > td:nth-child(2) > input:nth-child(1)").Click()

我不熟悉您正在尝试使用的Gecko，因此很难判断您需要声明或转换到哪种类型。作为一种快捷方式，您可能想尝试使用后期绑定。

Dim CWN As Object = GWB_SDR1_MyCall.Document.QuerySelector("div.ctl:nth-child(32) > table:nth-child(6) > tbody:nth-child(1) > tr:nth-child(2) > td:nth-child(2) > input:nth-child(1)")

CWN.Click()

您可能需要使用Option Strict Off进行编译。

如果继续出现问题，请尝试使用Dim CWN = GWB_SDR1_MyCall.Document.QuerySelector("div.ctl:nth-child(32) > table:nth-child(6) > tbody:nth-child(1) > tr:nth-child(2) > td:nth-child(2) > input:nth-child(1)")，然后在该指令之后中断调试器，并检查运行时类型。