如何从 vb.net 的列表框中添加特定值？答案

【问题标题】：how to add a specific value from a list box in vb.net?如何从 vb.net 的列表框中添加特定值？
【发布时间】：2016-12-22 14:11:29
【问题描述】：

我怎样才能只从这个列表框中检索总价，然后在一个文本框中总计？这是向列表框添加数据的代码

Private Sub cbitem_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles cbitem.SelectedIndexChanged
    If cbitem.SelectedIndex < 0 Then Return
    Dim price = Convert.ToDecimal(items(cbitem.SelectedIndex, 1))
    txtitemprice.Text = price
End Sub

Private Sub btnadd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnadd.Click
    Dim price = Convert.ToDecimal(txtitemprice.Text)
    Dim quantity = Convert.ToInt32(txtquantity.Text)
    Dim totalprice As Integer = price * quantity
    lstorder.Items.Add(cbitem.SelectedItem & vbTab & vbTab & vbTab & price & vbTab & vbTab & vbTab & quantity & vbTab & vbTab & totalprice)
End Sub

【问题讨论】：

在列表框中显示数据的方法不止一种，您应该显示这些数据是如何进入的。更好的选择是 DataGridView - 它是一个真正的网格，因此它具有实际的单元格。我怀疑您正在保存字符串，这意味着循环它们并将它们切碎以获取数据
@plutonix 从文本框中输入的数据，我不能使用 datagridview。
没有足够的细节。 在列表框中显示数据的方法不止一种 - 我们无法从图片中看出代码是什么样的。细节很重要。如果不显示与问题相关的代码，几乎不可能在这里提出一个好问题
a) 检查你的错误不多 - 如果在cbitem 中没有选择任何内容，它会崩溃 b) 为什么不查找数组中选择的项目？ c）控件旨在显示数据而不是管理它，我将使用代表购物车的集合 d）按原样，您添加了 stings，因此循环遍历 items 集合，拆分它，可以是任何/所有最后的元素转换为十进制 (?)，这样做并添加到 total var.
我理解这个问题。列表中的d 解释了如何。将其分解为步骤并做出一些努力。你不会学到很多被勺子喂的答案

标签： vb.net listbox listboxitems

【解决方案1】：

假设您有两个控件：ListBox1 和 TextBox1。

' Initialise the textBox to 0    
TextBox1.Text = 0

' Insert values in your listbox
 ListBox1.Items.Add(1)
 ListBox1.Items.Add(2)
 ListBox1.Items.Add(3)
 ListBox1.Items.Add(4)

 ' For each item in your ListBox
 For i As Integer = 0 To ListBox1.Items.Count - 1
      TextBox1.Text = TextBox1.Text + ListBox1.Items(i)
 Next

对于您的工作，您必须获取当前商品的价格并将其乘以它的数量。或者您可以对 totalPrice 列的每个项目求和。

【讨论】：