如果类 y 在类 x 内，为什么类 y 的实例不在实例内？

Question

我正在为我正在编写的杂货应用程序编写一个 VB.NET 类库，但我认为我对 OOP 在 VB.NET 中的工作方式存在误解。我原以为如果class x 在class y 中，那么class x 的instance 也将在class y 的instance 中，但显然不是案子。我将如何设置它以能够通过class y 访问class x 的实例？还有为什么实例 y 中没有实例 x？

（更新：我的意思是这个）

Public Class y
    Public Class x //class inside of class
    End Class
End Class
Public Class Form1
    Public Sub Form1_Load(<params>) Handles Me.Load
         Dim yinst As y = New y()
         Dim xinst As x = New y.x()
         MsgBox(yinst.xinst) //instance inside of instance
    End Sub
End Class

Answer 1

这会起作用（消息框调用除外），但我不确定这是否是您真正想要的。

Public Class y
   Public Class x '//class inside of class
   End Class
End Class

Public Class Form1
   Public Sub Form1_Load(<params>) Handles Me.Load
        Dim yinst As y = New y()
        Dim xinst As y.x = New y.x()
        'MsgBox(yinst.xinst) '//instance inside of instance
   End Sub
End Class

如果你想要一个 y 的实例有一个 x 的实例，那么我想你想要这样的东西：

Public Class y
    private x As New x 'A reference to an instance of x
    Public Class x 'class inside of class
    End Class
End Class

...或更好：

Public Class y
     Private _x As New x 'A reference to an instance of x
     Public Class x 'class inside of class
End Class

    Public Property InstX As x
        Get
            Return _x
        End Get
        Set(value As x)
            _x = value
        End Set
    End Property
End Class

在这两种形式中，x 都可以通过Dim xinst As y.x = yinst.InstX 访问。