Option Strict On
Public Class Foo
Private _bar As String
Public Property Bar As String
Get
Return _bar
End Get
Set(ByVal value As String)
_bar = value
End Set
End Property
End Class