Public Class WordChange

    Dim m_sourcestring As String
    Property SourceString() As String
        Get
            Return m_sourcestring
        End Get
        Set(ByVal Value As String)
            m_sourcestring = Value
        End Set
    End Property

    Dim m_targetstring As String
    Property TargetString() As String
        Get
            Return m_targetstring
        End Get
        Set(ByVal Value As String)
            m_targetstring = Value
        End Set
    End Property

    Public Sub New(ByVal Source As String, ByVal target As String)
        m_sourcestring = Source
        m_targetstring = target
    End Sub

End Class