Visual Basic

Public Function reportApplicationState(ByVal controlCollection As ControlCollection, Optional ByVal childDepth As Integer = 0) As String
    Dim layoutIndent As New String(" "c, childDepth)
    Dim report As String = String.Empty
    Dim childControl As Control
 
    For Each childControl In controlCollection
        If childControl.Controls.Count > 0 Then
            report &= childControl.Name & ":" & Environment.NewLine
            report &= reportApplicationState(childControl.Controls, childDepth + 1)
        Else
            report &= layoutIndent & childControl.Name & getValue(childControl) & Environment.NewLine
        End If
    Next
 
    Return report
End Function

Dim xDoc As New System.Xml.XmlDocument<br />
xDoc.Load("C:\MyFile.xml")<br />
<br />
Dim strValue as String = String.Empty<br />
<br />
Dim xList As System.Xml.XmlNodeList<br />
xList = xDoc.GetElementsByTagName("Element1")<br />
<br />
If xList.Count > 0 Then<br />
    strValue = xList.Item(0).InnerText<br />
End If