• 2021-04-14
    窗体上有名称为Command1的命令按钮,名称分别为List1、List2的列表框,其中List1的MultiSelect属性设置为1(Simple),并有如下事件过程:
    Private Sub Command1_Click()
    For i = 0 To List1.ListCount - 1
    If List1.Selected(i) = True Then
    List2.AddItem Text
    End If
    Next
    End Sub
    上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时,发现不能达到预期目的,应做修改,下列修改中正确的是