VB.NET使用Web Browser怎样获取网页中文本框的内容解决方案

VB.NET使用Web Browser怎样获取网页中文本框的内容
用VB.NET插入一个Web Browser控件，打开一个网页，请问用什么方法可以获取网页中文本框的内容？

[解决办法]

VB code

Private Sub webbrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)    Dim webDoc As Object    Dim webTag As Object    Dim lengthTag As Integer    Dim countTag As Integer        On Error Resume Next        Set webDoc = WebBrowser1.Document.All    lengthTag = webDoc.length - 1        For countTag = 0 To lengthTag        Set webTag = webDoc.Item(countTag)        Select Case Strings.LCase(webDoc.Item(countTag).tagName)             Case "input"                Select Case LCase(webTag.Type)                    Case "text"                        Debug.Print webTag.Value                End Select         End Select     NextEnd Sub
[解决办法]
VB.NET code
   Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted        If e.Url = Me.WebBrowser1.Document.Url Then  '加载完毕            If Me.ListView1.Items.Count = 0 Then   '第一次加载                 'Getlink有效果                Me.Button2.Enabled = True            Else                Me.RichTextBox1.Text = Me.RichTextBox1.Text & vbCrLf & Me.WebBrowser1.Document.GetElementById("TC11").InnerText                blnGet = True            End If        End If    End Sub我这边是用ID取,你看一下文本框对应的ID