Question

我在做一个小项目遇到一些麻烦试图保持OOP。

我有一个全球变量:

Public Stations As New Microsoft.VisualBasic.Collection()

2类: Station & amp; United :

Public Class Station

    Property name As String
    Property stype As String
    Property units As New Collection
End Class

Public Class unit
     Property name As String
     Property lbl As String
     Property ip As String
     Property utype As String
End Class

我猜你可以看到这里的等级制度:

Collection Stations -> Object Station -> Collection Units -> Object Unit

有一种代码从 XML 文件中抓取数据,并据此将对象添加到上面的收藏中。

However , I didn t figure how can I retrieve the collection of units based on the Stations collection. I tried something like this:

    Dim st = Stations.Item("The key of a specific object in the Stations collection")
    Dim stUnits = st.GetType().GetProperty("units")

但当我试图检索 st Uniteds 收藏时:

For Each unit In stUnits

It says that stUnits isn t a collection. I am a bit confused, thanks for any help possible.

Answer 1

Silly me. Forgot to set st as a station object.

Dim st As Station = Stations.Item("The key of a specific object in the Stations collection")

然后,简而言之:

Dim stUnits = st.units

友情链接