窗体上有名称为Command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1（Simple），并有如下事件过程：

上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时，发现不能达到预期目的，应做修改，下列修改中正确的是（　　）。

[单选题]窗体上有名称为command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1（Simple）

[单选题]（ 31 ） 窗体上有 List1 、 List2 两个列表框 ， List1 中有若干列表项 （ 见图 ） ， 并有下面的程序：Private Sub Comand1_Click （）F．or k=List1.ListCount-1 To 0 Step -1If List1.Selected （ k ） ThenList2.AddItem List1.List （ k ）List1.RemoveItem kE．nd IfNext kE．nd Sub程序运行时，按照图示在 List1 中选中 2

[单选题]窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4的内容，有下列程序： Private Sub Command1_Click() Dim i，s For i=0 To List1．ListCount s=s+List1．List(i) Next i Print s End Sub 程序运行后，单击命令按钮，则窗体上显示的是A．0B．10C．01234D．程序出错

[单选题]在窗体上有一个名称为List1列表框和一个名称为Command1的按钮，List1的MultiSelect属性设置为2。当单击Command1按钮时，将会把所有选中的选项全部删除。下列程序缺少的一句是______。Private Sub Command1_ Click () for i = List1. ListCount- 1 To 0 Step- 1 if ______ = True then List1. RemoveItem i End if Next iEnd SubA．List1.S

[单选题]在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：Private Sub Form_Load（）List1.AddItem "Item 1"List1.AddItem "Item 2"List1.AddItem "Item 3"E．nd SubPrivate Sub Command1_Click（）List1.List（List1.ListCount） = "AAAA"E．nd Sub程序运行后，单击命令按钮，其结果为（ ）。A．

[单选题]在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：PrivateSub Form_Load()List1.AddItem "Item1"List1.AddItem "Item2"List1.AddItem "Item3"E．nd SubPrivate Sub Command1_Click()List1.List(List1.Listcount) ="AAAA"E．nd Sub程序运行后，单击命令按钮，其结果为A．把字符串"AAA

[单选题]在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程。Private Sub Form_load()List1.AddItem "Itern 1"List1.AddItem "Itern 2"List1.AddItem "Itern 3"E．nd SubPrivate Sub Command1_Click()List1.List(List1.Listcount)="AAAA"E．nd Sub程序运行后,单击命令按钮,其结果为A．把字符

[单选题]在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程 Private Sub Form_Load() List1.Addltem"Iteml" List1.Addltem"Item2" List1.Addltem"Item3" End Sub Private Sub Command1_click() List1.List(List1.ListCount)="AAAA" End Sub 程序运行后，单击命令按钮，其结果为______。A

[单选题]在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程。 Private Sub Form_Load() List1.AddItem "Item 1" List1.AddItem "Item 2" List1.AddItem "Item 3" End Sub Private Sub Command1_Click() List1.List(List1.Listcount)="AAAA" End Sub 程序运行后，单击命令按钮，其结果为A

[单选题]窗体上有List1、List2两个列表框，List1中有若干列表项（如下图所示），并有下面的程序：程序运行时，按照下图所示在List1中选中两个列表项