求助大佬
1、在窗体上有1个列表框（List1，设置成允许多选）、1个组合框（Combo1，设置成简单组合框）和1个命令按钮（Command1），下面的程序运行后，列表框中自动添加北京、上海等6个城市，当选定其中的一项或几项后，单击命令按钮可将选定项添加到简单组合框中。程序中有2处局部错误，分别在不同的语句中，请调试程序，用
正确的
部分代码替换错误的部分代码（以一个完整标识符、数字或运算符为单位）。本题满分4分，找出一个错误得2分。
注意：(1)凡涉及到英文字母一律用大写。(2)两个答案按错误出现的先后顺序分两行书写（就像单元测试的填空题有两个空，答案写在两行一样）。(3)不要增减语句或语句的一部分。
Private Sub Form_Load()
List1.AddItem "北京"
List1.AddItem "上海"
List1.AddItem "深圳"
List1.AddItem "南京"
List1.AddItem "广州"
List1.AddItem "西安"
End Sub
Private Sub Command1_Click()
Dim i As Integer
For i = 1 To List1.ListCount - 1
If List1.Selected(i) Then
Combo1.AddItem List1.Text
End If
Next i
End Sub（4分）

For i = 1 To List1.ListCount - 1 '把1改成0
Combo1.AddItem List1.Text '改成 Combo1.AddItem List1.List(i)