我需要將列表框中的所有項目添加到「總計」變量中

以下是我嘗試運行的For循環的示例，其中lstCost是我的ListBox，它是通過從兩個其他ListBox並計算這些選項的總和來創建一個項目totalCost是我試圖保存所有列表項的總和的變量。我需要將列表框中的所有項目添加到「總計」變量中

Dim totalCost As Integer 
    For x As Integer = 0 To lstCost.Items.Count - 1 
     totalCost += Val(lstCost.Items.Item(x)) 
    Next 
    txtTotalCost.Text = totalCost.ToString

出於某種原因，我最終得到了0作爲我的txtTotalCost文本框中的總數。任何人都可以想到爲什麼？

來源

2017-02-16 AbeLincoln

什麼你調試這個時候偏偏將其更改爲Decimal？什麼具體出錯了？ – David

打開選項嚴格。 'Val'總是返回一個Double而不是整數 – Plutonix

什麼在列表框中？價值明智我的意思是.. –

Dim totalCost As Double = 0 

For x As Integer = 0 To lstCost.Items.Count - 1 

    totalCost += DirectCast(lstCost.Items.Item(x).ToString.trim,Double) 

Next 

txtTotalCost.Text = totalCost.ToString

根據自己的價值觀列表框，你可以在需要

來源

2017-02-17 07:16:27 Dandy

我需要將列表框中的所有項目添加到「總計」變量中

回答

相關問題