3

以下のようなコードで作業しています。DB の結果をループし、各行からビュー モデルを作成することによりBasketItemViewModel、クラスのスコープ内にの配列が作成されます。Basket

クラスを捨てて、Basketそれを何も設定しない場合、配列をループして、BasketItemViewModelそれらのそれぞれを何も設定しない必要がありますか?

Class Basket

    public GuidId
    public BasketItemViewModels
    public TotalItems
    public TotalCost

    Public Property Get TotalCostFormatted()
        TotalCostFormatted = FormatCurrency(TotalCost,0)
    End Property



    public Default function Init(p_GuidId, p_TotalItems, p_TotalCost)
        GuidId = p_GuidId
        BasketItemViewModels = GetBasketItemViewModels()
        TotalItems = p_TotalItems
        TotalCost = p_TotalCost
        set Init = Me
    end function 

    public function GetBasketItemViewModels()
        dim vmArray()

        for each row in dbResults
            // ...get some values...
            set vmArray(i) = (new BasketItemViewModel) (price, quantity, productId)
        next           

        GetBasketItemViewModels = vmArray
    end function 
End Class
4

1 に答える 1