Question

VB写如下条件代码：在下拉组合框中，选中哪一项，哪一项消失。

Answer 1

Dim 选中序号 As Integer
Private Sub ComboBox1_SelectionChangeCommitted(sender As Object, e As EventArgs) Handles ComboBox1.SelectionChangeCommitted
If ComboBox1.SelectedIndex >= 0 Then
选中序号 = ComboBox1.SelectedIndex
End If
ComboBox1.Items.RemoveAt(选中序号)
ComboBox1.Refresh()
End Sub

Answer 2

Private Sub Combo1_Click()
Combo1.RemoveItem (Combo1.ListIndex)
End Sub

追问

要设置下拉组合框的。

追答

不是很明白你想要什么功能

追问

就是在组合框的下拉菜单栏中，拉哪一项，哪一项就消失