Question

有关VB里面循环语句的问题

这个是个什么意思 循环用到什么地方了
For i = 0 To 20
If List1.List(List1.ListIndex) = List2.List(i) Then
MsgBox "该项已添加"
Exit Sub
End If
Next i
这一句又是什么意思
List1.List(List1.ListIndex) = List2.List(i)

Answer 1

List1.List(List1.ListIndex) = List2.List(i)

list1.listindex指当前list1中被选中的项目索引
List1.List(List1.ListIndex)指当前list1中被选中的项目

本题是检查list1中的当前选项，在list2中有没有，如果有，则MsgBox "该项已添加"

Answer 2

List1.List(List1.ListIndex) = List2.List(i)

意思是遍历表List2中的内容，表List1中的内容如果与List2中的内容一致，则弹出对话框该项已添加；