VB.Net修饰符

VB.Net是一种面向对象的编程语言，它提供了丰富的修饰符用于声明变量、方法和类的访问级别。修饰符的作用是控制变量和成员在程序中的可见范围和访问权限。在VB.Net中，修饰符可以分为四大类：访问修饰符、继承修饰符、可选修饰符和属性修饰符。下面将详细介绍这些修饰符的特性和用法。 一、访问修饰符 访问修饰符用于控制程序中的各个成员（字段、属性、方法、类等）的访问权限，包括Public、Protected、Friend、Private和Protected Friend五种修饰符。其中，Public表示公共的，可以在程序的任何地方访问；Private表示私有的，只能在声明该成员的类中访问；Protected表示受保护的，只能在声明该成员的类及其派生类中访问；Friend表示友元的，只能在同一个程序集中访问；Protected Friend表示既受保护又友元的，可以在同一个程序集中和该类的派生类中访问。 以下是访问修饰符的用法示例：

Public Class MyClass
    Public myPublicField As String
    Private myPrivateField As Integer
    Protected myProtectedField As Double
    Friend myFriendField As Date
    Protected Friend myProtectedFriendField As Boolean
End Class

Public Sub Main()
    Dim obj As New MyClass()
    Console.WriteLine(obj.myPublicField) '可以访问公共字段
    Console.WriteLine(obj.myPrivateField) '编译错误，不能访问私有字段
    Console.WriteLine(obj.myProtectedField) '编译错误，不能访问受保护字段
    Console.WriteLine(obj.myFriendField) '编译错误，不能访问友元字段
    Console.WriteLine(obj.myProtectedFriendField) '编译错误，不能访问受保护友元字段
End Sub

二、继承修饰符 继承修饰符用于控制类的继承关系。在VB.Net中，类可以通过Inherits关键字来继承另一个类。VB.Net支持单继承，即一个类只能继承自一个基类。通过继承，子类可以获取到基类的非私有成员（字段、属性、方法等），并可以重写基类的虚方法。继承修饰符有两种：NotInheritable和Inheritable。其中，NotInheritable表示该类不可被继承，Inheritable表示该类可以被继承，默认情况下是Inheritable的。 以下是继承修饰符的用法示例：

Public Class MyBaseClass

    Public Overridable Sub PrintMessage()
        Console.WriteLine("Base class message")
    End Sub

End Class

Public Class MyDerivedClass
    Inherits MyBaseClass

    Public Overrides Sub PrintMessage()
        Console.WriteLine("Derived class message")
    End Sub

End Class

Public Sub Main()
    Dim obj As New MyDerivedClass()
    obj.PrintMessage() '输出：Derived class message
End Sub

三、可选修饰符 可选修饰符用于修饰方法的参数和返回值。在VB.Net中，可选修饰符有以下几种：ByVal、ByRef、Optional和ParamArray。ByVal表示按值传递参数，即将参数的值传递给方法，在方法中修改参数的值不会影响到原来的变量；ByRef表示按引用传递参数，即将参数的引用传递给方法，在方法中修改参数的值会影响到原来的变量；Optional表示可选参数，即可以不提供该参数的值，方法中会使用参数的默认值；ParamArray表示参数数组，即一个方法可以接受可变数量的参数。 以下是可选修饰符的用法示例：

Public Sub AddNumbers(ByVal num1 As Integer, ByVal num2 As Integer, ByRef sum As Integer)
    sum = num1 + num2
End Sub

Public Sub Main()
    Dim result As Integer
    AddNumbers(10, 20, result)
    Console.WriteLine(result) '输出：30

    Sub AddNumbers(ByVal ParamArray numbers() As Integer)
    Dim sum As Integer = 0
    For Each number As Integer In numbers
        sum += number
    Next
    Console.WriteLine(sum)
End Sub

Public Sub Main()
    AddNumbers(10, 20) '输出：30
    AddNumbers(10, 20, 30) '输出：60
    AddNumbers(10, 20, 30, 40) '输出：100
End Sub

四、属性修饰符 属性修饰符用于定义和控制类的属性。在VB.Net中，属性是一种特殊的方法，用于访问和修改类的私有字段。属性修饰符有以下几种：ReadOnly、WriteOnly和Default。ReadOnly表示只读属性，只能获取属性的值，不能修改；WriteOnly表示只写属性，只能设置属性的值，不能获取；Default表示默认属性，可以通过类的实例直接访问属性。 以下是属性修饰符的用法示例：

Public Class MyClass

    Private myField As Integer

    Public ReadOnly Property MyReadOnlyProperty As Integer
        Get
            Return myField
        End Get
    End Property

    Public WriteOnly Property MyWriteOnlyProperty As Integer
        Set(ByVal value As Integer)
            myField = value
        End Set
    End Property

    Default Public Property Item(ByVal index As Integer) As Integer
        Get
            Return myField * index
        End Get
        Set(ByVal value As Integer)
            myField = value
        End Set
    End Property

End Class

Public Sub Main()
    Dim obj As New MyClass()
    Console.WriteLine(obj.MyReadOnlyProperty) '输出：0
    obj.MyWriteOnlyProperty = 10
    Console.WriteLine(obj.MyReadOnlyProperty) '输出：10
    Console.WriteLine(obj(5)) '输出：50
    obj(5) = 20
    Console.WriteLine(obj.MyReadOnlyProperty) '输出：20
End Sub

总结：VB.Net提供了丰富的修饰符用于声明变量、方法和类的访问级别。访问修饰符用于控制成员的访问权限，继承修饰符用于控制类的继承关系，可选修饰符用于修饰方法的参数和返回值，属性修饰符用于定义和控制类的属性。熟练掌握各种修饰符的特性和用法可以帮助我们编写更安全、可维护性更好的代码。