อัพเดรทโค้ดเก่าจาก VB2008 เป็น VB2013 โค้ด Function ใช้ไม่ได้ครับ

Public Function CommentSection(ByVal SectionName As String) As Boolean
        'Comments a given section and all of its keys
        Dim ThisSection As Section = GetSection(SectionName)
        If ThisSection Is Nothing Then Return False
        ThisSection.IsCommented = True
        Dim myEnumerator As System.Collections.IEnumerator = ThisSection.GetEnumerator()
        While myEnumerator.MoveNext()
            myEnumerator.Current.IsCommented = True
        End While
        Return True
    End Function