2014-03-01 80 views
1

我可以創建一個字段,它是我的類的數組就好了。我無法創建我的財產作爲一個數組。我是否真的需要逐一定義每一個物業?或者有更好的方法來做到這一點。我所嘗試的一切都給了我一個錯誤。 _Pencil(5)給我一個錯誤。vb使用數組創建屬性

公共類鋼筆

Private pens(5) As Integer 

ReadOnly Property _Pencil(5) As Integer 
    Get 
     Return pens(0) 
     Return pens(1) 
     Return pens(2) 
     Return pens(3) 
     Return pens(4) 
     Return pens(5) 
    End Get 
End Property 

末級

我真的很感激所有幫助。

更新埃德溫碼的偉大工程,但我無法檢索信息

類標記

Private _pens(5) As Integer 

    Public ReadOnly Property Pencil As Integer() 
     Get 
      Return _pens 
     End Get 
    End Property 

    Sub New() 
     _pens(0) = 1 
     _pens(1) = 2 
     _pens(2) = 3 
     _pens(3) = 4 
     _pens(4) = 5 
     _pens(5) = 6 
    End Sub 


End Class 

這似乎是工作,但是當我看不到_pens(0),_pens的值(1),所以當創建我對象

暗淡測試作爲新的標記()

test.Pencils <上----我看不到的元素該陣列

感謝

+0

明確5參數是錯誤的。它應該可能是一個變量(例如'nPen as Integer')和返回值,可能是'pen(nPen)'。如果你確實想要返回一個數組,那麼'Property Pencil as Integer()',你仍然不需要參數 – Plutonix

+0

我不確定你的意思。對不起,你可以編寫代碼,以便我可以看到。如果不是不擔心 – user3363744

+0

看起來你正在使用不同的課程。你應該做「像新鉛筆一樣進行暗淡測試」 – Edwin

回答

1

數組是它自己的事情。您只需返回它,而不指定每個項目。下劃線通常表示私有字段。

試試這個:

Private _pens(5) as Integer 

Public ReadOnly Property Pencil As Integer() 
    Get 
     Return _pens 

    End Get 
End Property 
+0

ahhh那是什麼下劃線是。謝謝 – user3363744

+0

這仍然給我一個錯誤。在_pens下面有一個藍色的squig,表示類型爲「Integer的1維數組」的Value不能轉換爲整數 – user3363744

+0

對不起,括號後面跟着屬性的類型,剛剛更新。 – Edwin

-2

嘗試

ReadOnly Property Pencil() As Integer 
    Get 
Return pens(0) 
     Return pens(1) 
     Return pens(2) 
     Return pens(3) 
     Return pens(4) 
     Return pens(5) 
    End Get 
End Property 

只是用它代替_pencil鉛筆()(5)

+0

謝謝,我已經試過了。當我創建一個鉛筆類型的新對象時,我無法讀取每個值,üDim myPen As Pencil myPen.pens()< - 只返回筆(0)。 – user3363744

+0

執行在第一次返回時停止。其他退貨將** **從不**運行 –

+0

謝謝馬克! – user3363744