Dim sectionCollection _
As ConfigurationSectionCollection = _
sectionGroup.Sections
Dim sectionName As String
For Each sectionName In sectionCollection.Keys
    Dim section As ConfigurationSection = _
    CType(sectionCollection( _
    sectionName), ConfigurationSection)
    Console.WriteLine((getSpacer() + _
    "Section Name:" + _
    section.SectionInformation.Name))
Next sectionName

ConfigurationSectionCollection sectionCollection = 
    sectionGroup.Sections;
foreach (String sectionName in sectionCollection.Keys)
{
    ConfigurationSection section = 
        (ConfigurationSection)sectionCollection[sectionName];
    Console.WriteLine(getSpacer() + "Section Name:" 
        + section.SectionInformation.Name);
}