如何在vb.net中访问一个子中的另一个子中声明的变量

Public Class ParentClass
    Public Shared SharedVariable As String

    Public Shared Property SharedProperty As String
        Get
            Return SharedVariable
        End Get
        Set(value As String)
            SharedVariable = value
        End Set
    End Property
End Class

Public Class FirstChildClass
    Public Sub SetSharedVariable(value As String)
        ParentClass.SharedProperty = value
    End Sub
End Class

Public Class SecondChildClass
    Public Sub GetSharedVariable()
        Dim value As String = ParentClass.SharedProperty
        Console.WriteLine("The value of the shared variable is: " & value)
    End Sub
End Class

Dim firstChild As New FirstChildClass()
firstChild.SetSharedVariable("Hello World")

Dim secondChild As New SecondChildClass()
secondChild.GetSharedVariable()