2013-05-02 17 views
0

我有一個在VB 2010中的列表框,需要將所有值乘以文本框中鍵入的數字。該值必須被讀取,刪除並使用循環插入。如何通過讀取,插入和刪除來編輯列表框中的所有值? VB

謝謝

+0

一個例子會讓事情更清楚。你的列表框只包含數字嗎?這些數字是多重複制的初始輸入嗎?應該將該列表框中的值替換爲結果嗎?到目前爲止你做了什麼?請澄清。 – 2013-05-02 11:21:11

+0

你在球:) ListBox只包含數字。列表框中的數字必須乘以文本框中鍵入的數量。列表框中的值應該由結果替換。 '對於vIndex = 0至ListBox1.Items.Count - 1 ' vCount = ListBox1.Items(vIndex) 'ListBox1.Items.RemoveAt(vIndex) ' ListBox1.Items.Insert(vCount,纈氨酸(TextBox1.Text )+ Val(TextBox1.Text)* 0.1) – 2013-05-02 11:35:13

回答

0

爲什麼要刪除並重新插入,當你只想修改現有的值?試試這個:

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 
+0

工作。謝謝。 – 2013-05-02 12:42:06

0

它很容易更新列表框中的項目。只需在更新按鈕的點擊事件中輸入上面的代碼即可。

Dim index As Integer=Listbox1.SelectedIndex 
Listbox1.Items.Remove(Listbox1.SelectedItem) 
Listbox1.Items.Insert(index,Textbox1.Text) 

此處文本框包含要更新的值。首先在文本框中寫入值。然後選擇您希望用文本框的值更新的項目,然後單擊更新按鈕更新項目。

相關問題