looks like you are directly referencing the class, from your
listing it is not clear about your object hierarchy but my guess would
be
Public ReadOnly Property SubTotal() As Decimal
Get
Dim d As Decimal = 0DFor Each item As CartItem In Me.Cart.GetItems()
d += item.Total
Next
Return d
End Get
End Property
Raghu
(MCSD.NET, MCAD.NET, MCDBA)
[Don't forget to click on Mark as answer on the post that helped you ]