vb 一个list框向另一个list框中添加数据,怎样使list框中的信息不重复?谢谢了。

2025-04-06 03:28:58
推荐回答(2个)
回答1:

Private Sub Command1_Click()
For i = 0 To List2.ListCount - 1
If List2.List(i) = List1.Text Then Exit Sub
Next
List2.AddItem List1.Text
End Sub

Private Sub Form_Load()
For i = 1 To 10
List1.AddItem i
Next
End Sub

回答2:

添加和删除时候循环判断啊