Удалить значение из комбобокса - VB

Формулировка задачи:

k = 
 i =   Form1.Combo1.ListCount
Form1.Combo1.RemoveItem 
Form1.Combo1.Refresh

 

Пишет ошибку runtime error 5 invalid procedure call or argument. Почему?

Решение задачи: «Удалить значение из комбобокса»

textual
                            Листинг программы 
                        

                            i = <font color="darkblue"><b>0</b></font>
<font color="blue">do</font> <font color="blue">while</font> i < Form1.Combo1.ListCount
   <font color="blue">if</font> Left(Form1.Combo1.List(i),<font color="darkblue"><b>1</b></font>) = <font color="teal">"1"</font> <font color="blue">then</font>
      Form1.Combo1.RemoveItem (i)
   <font color="blue">else</font>
      i = i + <font color="darkblue"><b>1</b></font>
   <font color="blue">end</font> <font color="blue">if</font>
<font color="blue">loop</font>
Form1.Combo1.Refresh
                        