HtmlDocument.GetElementsByTagName(String) 方法

public:
 System::Windows::Forms::HtmlElementCollection ^ GetElementsByTagName(System::String ^ tagName);

public System.Windows.Forms.HtmlElementCollection GetElementsByTagName(string tagName);

member this.GetElementsByTagName : string -> System.Windows.Forms.HtmlElementCollection

Public Function GetElementsByTagName (tagName As String) As HtmlElementCollection

参数

返回

标记名称等于参数的 tagName 元素的集合。

示例

HTML 页面通常使用 META 标记嵌入有关文档的任意信息。 以下 HTML 代码示例检索 HTML 文档中的所有META标记，查找具有名称META的Description标记，并将其显示给用户。 该代码示例要求应用程序具有名为 /a0> 的 控件。

private void DisplayMetaDescription()
{
    if (webBrowser1.Document != null)
    {
        HtmlElementCollection elems = webBrowser1.Document.GetElementsByTagName("META");
        foreach (HtmlElement elem in elems)
        {
            String nameStr = elem.GetAttribute("name");
            if (nameStr != null && nameStr.Length != 0)
            {
                String contentStr = elem.GetAttribute("content");
                MessageBox.Show("Document: " + webBrowser1.Url.ToString() + "\nDescription: " + contentStr);
            }
        }
    }
}

Private Sub DisplayMetaDescription()
    If (WebBrowser1.Document IsNot Nothing) Then
        Dim Elems As HtmlElementCollection
        Dim WebOC As WebBrowser = WebBrowser1

        Elems = WebOC.Document.GetElementsByTagName("META")

        For Each elem As HtmlElement In Elems
            Dim NameStr As String = elem.GetAttribute("name")

            If ((NameStr IsNot Nothing) And (NameStr.Length <> 0)) Then
                If NameStr.ToLower().Equals("description") Then
                    Dim ContentStr As String = elem.GetAttribute("content")
                    MessageBox.Show("Document: " & WebOC.Url.ToString() & vbCrLf & "Description: " & ContentStr)
                End If
            End If
        Next
    End If
End Sub

另请参阅

• getElementsByTagName 方法