Simplify Your Code with Reflection: Listing 2: VB.NET, Implement a DirtyControls Class

The DirtyControls class represents a single node in the XML file. This class is responsible for loading the XML file and creating a separate DirtyControl class for each node in the XML file. This class also includes a method to locate a specific instance of the DirtyControl class by its "Type."

Public Class DirtyControls
   Inherits System.Collections.Generic.List(Of DirtyControl)

   Private mstrType As String = String.Empty

   Public Sub LoadControls(ByVal FileName As String)
      Dim ds As New DataSet
      Dim dc As DirtyControl

      ds.ReadXml(FileName)
      For Each dr As DataRow In ds.Tables(0).Rows
         dc = New DirtyControl

         dc.Type = dr("Type").ToString()
         dc.Property1 = dr("Property1").ToString()
         dc.Property2 = dr("Property2").ToString()
         dc.IsMultiList = ToBoolean(dr( _
            "IsMultiList").ToString())
         dc.PropertyToCheck = _
            dr("PropertyToCheck").ToString()
         dc.PropertyToCheckValue = _
            dr("PropertyToCheckValue").ToString()

         Me.Add(dc)
      Next
   End Sub

   ' Other methods go here
   ...

End Class
comments powered by Disqus
Most   Popular
Upcoming Events

.NET Insight

Sign up for our newsletter.

Terms and Privacy Policy consent

I agree to this site's Privacy Policy.