VBA的Property Let，不接受值傳遞

Question

'CLASS PROPERTY CODE 
Public Property Let setCode_ID(ByVal vCode_ID As String) 
    Code_ID = vCode_ID 
End Property 

For Each Cell In WS_CostCode.Range(Cells(2, 1), Cells(fRow, 1)) 'COLUMN OF CODE_ID 
    Set CostCodeItem = New Cost_CodeCL 
    CostCodeItem.setCode_ID = "code id" 'WS_CostCode.Cells(Cell.Row, Cell.Column) 'SET CODE_ID 'SET CODE_ID 
    CostCodeItem.setCode_Description = "code desc" 'WS_CostCode.Cells(Cell.Row, Cell.Column + 1) 'SET CODE_DESCRIPTION 
    CostCodeItem.setCode_Category = "code category" 'WS_CostCode.Cells(Cell.Row, Cell.Column + 2) 'SET CODE_CATEGORY 

    uKey = CostCodeItem.getCode_ID 
    Debug.Print CostCodeItem.getCode_ID 
    CostCodeColl.Add CostCodeItem, CostCodeItem.getCode_ID 
Next Cell 

我pproperty「VCODE」應該顯示我傳遞的任何字符串中的每個循環，但它運行的時候，只要它進入物業讓我通過它一步確保我的字符串被傳遞，它顯示爲「」，而不是我傳遞的任何東西。

我在另一個類中使用了EXACT相同的代碼，它的工作原理與預期完全一樣。爲什麼這不正確。

謝謝

Answer 1

哇，我覺得這樣一個新手！抱歉沒有時間。我想我一直在尋找很多代碼，並沒有得到足夠的休息。我有一個偶然寫下的公式。

再次感謝。