listbox1.items.add("已完工")
如果只打這一句的話就會重復出現相同的
我想要的結果是只出現一次
在selectedindexchanged事件里面

ListBox1.Items.Clear()
listbox1.items.add("已完工")

你這樣前面的幾列不就清空了
前面是寫了
已發料
生產中
用代碼加的只有一列，已完工

Dim REyh As Boolean = True
For i = 0 To ListBox1.Items.Count - 1
    If ListBox1.Items.Item(i) = "已完工" Then
       REyh = False
    End If
Next
If REyh Then
   ListBox1.Items.Add("已完工")
End If

以上謝謝
如果不是最后一個，而是在兩個之間呢？

[[it] 本帖最后由 jxyga111 于 2008-9-22 19:06 编辑 [/it]]

以上代码,不管在什么位置都是一样的.

謝謝我沒注意。