vb中向combobox控件中永久添加item

Dim s As String '当用户选择combo1中的“其他”时，允许用户输入一个字符串变量添加到combo1中

Dim h As Integer '循环变量

Private Sub Combo1_Click()

If Combo1.ListIndex = Combo1.ListCount - 1 Then

    s = InputBox("请输入测试项目")

    If s <> "" Then

        Combo1.AddItem s, Combo1.ListCount - 1

        Combo1.ListIndex = Combo1.ListCount - 2

    End If

End If

End Sub

Private Sub Command1_Click() '保存按钮

SaveSetting "MyApp", "setup", "Form3.Text1", Text1.Text

SaveSetting "MyApp", "setup", "Form3.Text2", Text2.Text

SaveSetting "MyApp", "setup", "Form3.Text3", Text3.Text

s = ""

For h = 4 To Combo1.ListCount - 2

    If s <> "" Then s = s & "|"

    s = s & Combo1.List(h)

Next h

If s <> "" Then SaveSetting "MyApp", "setup", "Combo1.List", s

SaveSetting "MyApp", "setup", "Form3.Combo1", Combo1.ListIndex

Unload Me

End Sub

Private Sub Command2_Click() '取消按钮

Unload Me

End Sub

Private Sub Form_Load()

Dim ss() As String

Text1.Text = GetSetting("MyApp", "setup", "Form3.Text1", Text1.Text)

Text2.Text = GetSetting("MyApp", "setup", "Form3.Text2", Text2.Text)

Text3.Text = GetSetting("MyApp", "setup", "Form3.Text3", Text3.Text)

s = GetSetting("MyApp", "setup", "Combo1.List", "")

If s <> "" Then

    ss = Split(s, "|")

    For h = 0 To UBound(ss)

        Combo1.AddItem ss(h), Combo1.ListCount - 1

    Next h

End If

Combo1.ListIndex = GetSetting("MyApp", "setup", "Form3.Combo1", Combo1.ListIndex)

End Sub

可以做一个和combox下拉项同步的数组，根据选择的下标到同步的数组中取要的数据,C# 代码如下：

List<ListItem>items = new List<ListItem>()//实例化一个泛型

            items.Add(new ListItem("0", "--请选择--"))//添加一个Items

items.Add(new ListItem("1", "上"))//添加一个Items

items.Add(new ListItem("2", "下"))//添加一个Items

//添加一个combobox ，名称：cbuser

cbUser.ValueMember = "text"//定义显示数据

            cbUser.DisplayMember = "value"//定义实际值

            cbUser.DataSource = items//绑定数据

在VC++中实现鼠标悬停在combobox的item项上一段时后发送一个消息，可以使用以下方法：

1、在VC++的工程中添加一个消息处理函数，用来处理combobox发送的消息。

2、在combobox的属性中设置悬停消息的超时时间，比如说10毫秒。

3、在combobox的消息处理函数中添加对悬停消息的处理代码，比如说当收到悬停消息时，发送一个自定义消息。

4、在程序的主窗口中添加一个消息处理函数，用来处理自定义消息。以上是一种实现鼠标悬停在combobox的item项上一段时后发送一个消息的方法，希望能够对您有所帮助。

---