2011-08-08 192 views
1

我創建了一個類並將其對象放入Arraylist中。枚舉對象

這裏是類:

Public Class ItemColl 

    Public TBPid, PAid As Integer 

    Public Sub New(ByVal _TBPid As Integer, ByVal _PAid As Integer) 
     TBPid = _TBPid 
     PAid = _PAid 
    End Sub 
End Class 

Dim arrlst as new ArrayList 

arrlst.Add(new ItemColl("1a","12")) 

arrlst.Add(new ItemColl("1b","123")) 

arrlst.Add(new ItemColl("1as","45")) 

arrlst.Add(new ItemColl("1tr","67")) 

我要的是每當我使用它的索引列舉的ArrayList,它會給我帶來了 「ItemColl.TBPid」(請參閱​​下面..)

For i As Integer = 0 To arrlst.Count - 1 

    arrlst.item(i) //Here I need TBPid to be returned. 

Next 

我知道我可以重寫ToString(),但是用「.ToString()」更改現有代碼會花費很多時間。

+0

@ [Umesh Kumawat]總是用您正在使用的技術和語言(例如.NET,VB.NET)來標記您的問題。你沒有得到任何其他答覆的原因是你沒有確定技術,所以.NET程序員不知道你的問題與他們有關。我試圖爲您添加標籤,但未獲批准。 – Zesty

回答

1

創建一個班級,然後創建該類型的generic list。有了一個強類型列表中,您就可以訪問該對象的屬性,象下面這樣:

Dim myList As New List(Of ItemColl)() 
myList(0).PAid1 = 1 

當然,你也可以投中的每個對象的ArrayList到ItemColl:

TBPid= CType(arrlst(0), ItemColl).TBPid 

但,我建議使用一個列表。