Code Blocks:
<Code Language="VB" Kind="method decl">
<![CDATA[Private $PrivateVariable$ As
$PropertyType$
Public Property $PropertyName$() As $PropertyType$
Get
Return $PrivateVariable$
End Get
Set(ByVal value As $PropertyType$)
$PrivateVariable$ = value
End Set
End Property]]>
</Code>