下面的示例演示如何访问 contact 对象中的名为 phone 的子节点。
Dim contact As XElement = _
<contact>
<name>Patrick Hines</name>
<phone type="home">206-555-0144</phone>
<phone type="work">425-555-0145</phone>
</contact>
Dim homePhone = From hp In contact.<phone> _
Where contact.<phone>.@type = "home" _
Select hp
Console.WriteLine("Home Phone = {0}", homePhone(0).Value)
这段代码将显示以下文本:
Home Phone = 206-555-0144
下面的示例演示如何访问 contacts 对象的 contact 子轴属性所返回的集合中的名为 phone 的子节点。
Dim contacts As XElement = _
<contacts>
<contact>
<name>Patrick Hines</name>
<phone type="home">206-555-0144</phone>
</contact>
<contact>
<name>Lance Tucker</name>
<phone type="work">425-555-0145</phone>
</contact>
</contacts>
Dim homePhone = From contact In contacts.<contact> _
Where contact.<phone>.@type = "home" _
Select contact.<phone>
Console.WriteLine("Home Phone = {0}", homePhone(0).Value)
这段代码将显示以下文本:
Home Phone = 206-555-0144
下面的示例将 ns 声明为 XML 命名空间前缀。然后,该示例使用该命名空间前缀创建 XML 文本并访问第一个具有限定名 ns:name 的子节点。
Imports <xmlns:ns = "http://SomeNamespace">
Class TestClass4
Shared Sub TestPrefix()
Dim contact = <ns:contact>
<ns:name>Patrick Hines</ns:name>
</ns:contact>
Console.WriteLine(contact.<ns:name>.Value)
End Sub
End Class
这段代码将显示以下文本:
Patrick Hines