<DIV id=ext-gen324 class=x-grid3-body>
<DIV style="WIDTH: 1228px" class="x-grid3-row " rowIndex="0">
<TABLE style="WIDTH: 1228px" class=x-grid3-row-table border=0 cellSpacing=0 cellPadding=0>
<TBODY>
<TR>
<TD style="WIDTH: 20px" class="x-grid3-col x-grid3-cell x-grid3-td-checker x-grid3-cell-first " tabIndex=0>
<DIV class="x-grid3-cell-inner x-grid3-col-checker" unselectable="on">
<DIV class=x-grid3-row-checker> </DIV></DIV></TD>
這是一個網頁里的一個復選框源代碼（未有打勾）的
如果復選框打了勾的，這是網頁上復選框源代碼
<DIV style="WIDTH: 1228px" class="x-grid3-row x-grid3-row-selected " rowIndex="0">
1、
HtmlElement.click
HtmlElement測驗過div、table、tr、td等
結果：均無效果。
2、
HtmlElement.SetAttribute "ClassName", "x-grid3-row x-grid3-row-selected"
HtmlElement是需選中那一行的div
結果：外觀上看似是選中了，但實際在點相關操作按鈕時（如：編輯、洗掉），系統提示：請選擇至少一條資料。
網上有個方法是呼叫JS可以的，但是C#寫的
int rowIndex = 0;
HtmlElement script = webBrowser1.Document.CreateElement("script");
script.SetAttribute("type", "text/javascript");
script.SetAttribute("text", "function test(){" +
"var myGrid = Ext.getCmp('myGridId');" +
"myGrid.getSelectionModel().selectRow(" + rowIndex + ");" +
"}"
);
webBrowser1.Document.Body.AppendChild(script);
webBrowser1.Document.InvokeScript("test");
這個代碼能否幫我轉成VB代碼嗎？
Dim rowIndex%, Script
rowIndex = 0
Set Script = Form1.WebBrowser2.document.createElement("script")
Script.setAttribute "type", "text/javascript"
Script.setAttribute "text", "function test(){" & "var myGrid = Ext.getCmp('myGridId');" & "myGrid.getSelectionModel().selectRow(" & rowIndex & ");" & "}"
Form1.WebBrowser2.document.body.appendChild (Script)
Form1.WebBrowser2.document.InvokeScript ("test")
是否上述寫這樣嗎？
我執行了一下“Form1.WebBrowser2.document.InvokeScript ("test")”就出現錯誤：物件不支持該屬性和方法
想請教各位，上邊寫的代碼是哪里不對，又或者有什么好方法選上這個復選框但要有效果的，謝謝
uj5u.com熱心網友回復：
沒看明白文中強調“復選框”有沒打勾有什么意義，不過你把C#代碼那么直譯，頂多也只是個VB.NET代碼，肯定變不成VB6的uj5u.com熱心網友回復：
我是想好像VB里的WEBBROWER自動把“復選框”打勾的意思，能有方法呼叫嗎？uj5u.com熱心網友回復：
哦，你這是用的ExtJs3還是4啊。我本來想用下Extjs,但看它似乎很難設定字體大小，就沒太仔細去看。這方面dojo似乎好些呢？uj5u.com熱心網友回復：
多謝“bcrun”的回復，其實有個網頁是用ExtJs3來做的，里面的網頁函式只呼叫JS檔案來做成的，而JS檔案里面就是“ExtJs3”來的。這就是網頁的源代碼（用記事本來打開的）：
<body id="main_content" leftmargin="0" topmargin="0" rightmargin="0" bottommargin="0">
<table width="100%" height="100%">
<tr>
<td valign="top">
<div id="user-defined-content"></div>
<div id="searchtool"></div>
<div id="model-grid"></div>
<div id="note"></div>
<div id="exportexcel"></div>
</td>
</tr>
</table>
</body>
而最上面（樓主）的代碼是呼叫了JS檔案出來的才得出代碼來的。
平時我是用VB的WEBBROWSER來找好物件，然后用“click”的事件，來完成自動打勾的。
現在的的物件只有"DIV"這個層。至于其他計算機語言，我也一點也不會。能否提供VB的指點或者方法嗎。
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/139688.html
標籤：網絡編程
上一篇：vb里面microsoft chart control加載不進去怎么辦？哪里可以下載，謝謝
下一篇：表單顯示例外？