我发现这对我很难。看到有2个lisbox。一个包含零售产品的价格,第二个包含零售产品的数量。
用户可以根据需要添加任意数量的项目。所以项目数量不限。我希望在添加新项目时**,**代码会自动计算总现金。通过将所有项目与其数量列表相乘并添加它们。 请请帮帮我。 在此先感谢。
答案 0 :(得分:1)
最简单的解决方案是循环包含价格的列表框。数量指数等于价格指数。对?
' this holds the value for the total amount
Dim totalAmount As Integer = 0
' loops the listbox to all items
For a As Integer = 0 To ListBox1.Items.Count - 1
totalAmount = totalAmount + (CInt(ListBox1.Items(a).ToString) * CInt(ListBox2.Items(a).ToString))
Next
MsgBox(totalAmount)