Question

用VB建立一个没有选项的组合框。

要求：当在其文本框中输入新的数据并回车时，添加选项；当双击某选项时，弹出消息框，提示是否删除该项，选择确定则删除

Answer 1

vb6测试OK，

添加combo 调整控件宽高，高要拉大一些，设置style属性为1

Private Sub Combo1_DblClick()
    If 1 = MsgBox("是否删除？", vbOKCancel, "删除选中项") Then
        Combo1.RemoveItem Combo1.ListIndex
    End If
End Sub
Private Sub Combo1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        Combo1.AddItem Combo1.Text
    End If
End Sub

追问

哪部分是具体代码。可以出结果的。

这个是利用数组相关的章节的问题。

Answer 2

VB的什么版本？