Vb.net 如何通过读取、插入和删除来编辑列表框中的所有值?VB
我在VB2010中有一个列表框,需要将所有值乘以文本框中键入的数字。必须使用循环读取、删除和插入该值Vb.net 如何通过读取、插入和删除来编辑列表框中的所有值?VB,vb.net,loops,listbox,Vb.net,Loops,Listbox,我在VB2010中有一个列表框,需要将所有值乘以文本框中键入的数字。必须使用循环读取、删除和插入该值 谢谢当您只想修改现有值时,为什么要删除并重新插入?试试这个: Dim mult = Val(TextBox1.Text) For vIndex = 0 To ListBox1.Items.Count - 1 Dim newVal = Val(ListBox1.Items(vIndex)) * mult ListBox1.Items(vIndex)
谢谢当您只想修改现有值时,为什么要删除并重新插入?试试这个:
Dim mult = Val(TextBox1.Text)
For vIndex = 0 To ListBox1.Items.Count - 1
Dim newVal = Val(ListBox1.Items(vIndex)) * mult
ListBox1.Items(vIndex) = Trim(Str(newVal))
Next
更新列表框中的项目很简单。只需在更新按钮的单击事件中编写上述代码
Dim index As Integer=Listbox1.SelectedIndex
Listbox1.Items.Remove(Listbox1.SelectedItem)
Listbox1.Items.Insert(index,Textbox1.Text)
此处文本框包含要更新的值。首先在文本框中写入值。然后选择您希望使用textbox值更新的项目,然后单击更新按钮更新该项目。一个示例将使事情更加清楚。您的列表框是否只包含数字?这些数字是多重应用程序的初始输入吗?该列表框中的值是否应替换为结果?到目前为止你做了什么?请澄清。你很有把握:)列表框只包含数字。列表框中的数字必须乘以文本框中键入的金额。列表框中的值应替换为结果。”对于vIndex=0到ListBox1.Items.Count-1'vCount=ListBox1.Items(vIndex)'ListBox1.Items.RemoveAt(vIndex)'ListBox1.Items.Insert(vCount,Val(TextBox1.Text)+Val(TextBox1.Text)*0.1)