[求助]ComboBox中的RemoveItem方法

Threaten

在ComboBox1选中并点击其中一个Item后将此Item加入到ListBox1的同时在ComboBox1中也删除此Item

Private Sub ComboBox1_Change()
      ListBox1.AddItem ComboBox1.Text
      ComboBox1.RemoveItem ComboBox1.ListIndex
End Sub



为什么会提示：无效参数!

应该怎么做呢?



谢谢

andymark

你的OFFICE是什么版本,我的是2003可以正常运行上面代码

Threaten

可是运行Combobox.RemoveItem时提示无效参数啊

[此贴子已经被作者于2006-6-27 14:57:24编辑过]

andymark

可以

Private Sub Combo0_Change()
Me.List2.AddItem Me.Combo0.Text
Me.Combo0.RemoveItem Me.Combo0.ListIndex
Me.Combo0 = ""
End Sub

Private Sub Form_Load()
Me.Combo0.AddItem "a"
Me.Combo0.AddItem "b"
Me.Combo0.AddItem "c"
End Sub

Threaten

我试过了,在ComboBox中当时点击选中的那个Item,好像不能Remove,其他的Item倒是可以Remove的

这位大哥,请问我应该怎么做呢?

望指教!

谢谢

andymark

Combobox必须是值列表