VB.NET属性书写

可以声明带有混合访问级别的属性

如下：

『VB.NET]

Private salaryValue As Double
Protected Property salary() As Double
Get
Return salaryValue
End Get
Private Set(ByVal value As Double)
salaryValue = value
End Set
End Property

在前面的示例中，Get 过程具有与属性自身相同的 Protected 访问权限，而 Set 过程具有 Private 访问权限。 派生自 employee 的类可以读取 salary 值，但只有 employee 类可以对它进行设置。