Class ThisClass
Private m_PropVal As String
Public Property One() As String
Get
' Return the value stored in the local variable.
Return m_PropVal
End Get
Set(ByVal Value As String)
' Store the value in a local variable.
m_PropVal = Value
End Set
End Property
End Class