Imports Microsoft.VisualBasic Public Class TestClass Private TestPropertyValue As String Public Property TestProperty() As String Get Return TestPropertyValue End Get Set(ByVal value As String) TestPropertyValue = value End Set End Property End Class