vb.net 在运行时附加组合框文本?

vb.net append combobox text at runtime?

您好,我有一个组合框,其中填充了预设列表。我想要的是,如果预设被更改(tweeked),组合框中的选定项目将附加现有文本...

例如,如果组合框项目是原始的(来自表单加载事件)显示为立方体...并且我编辑组合框中的文本现在显示立方体的预设...(已编辑)...我是什么我不想添加名为 Cube 的新项目...(已编辑)我只想将名为 Cube... 的现有项目附加到已编辑的 Cube...

这可能吗?

好的,我用 c# 做了这个,然后用翻译器把它转换成 Visual Basic。
根据我从您的问题中可以理解的内容,它应该可以解决问题。

Public Class Form1

Dim OLDDATA As String

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Dim myItems = New List(Of String)
    myItems.Add("Hello")
    myItems.Add("World")
    myItems.Add("Cube")

    For Each item As String In myItems
        ComboBox1.Items.Add(item)
    Next

End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Try
        ComboBox1.Items.Remove(OLDDATA)
        ComboBox1.Items.Add(ComboBox1.Text)
        ComboBox1.Update()
    Catch ex As Exception
        MessageBox.Show(ex.Message)
    End Try
End Sub

Private Sub ComboBox1_Click(sender As Object, e As EventArgs) Handles ComboBox1.Click
    OLDDATA = ComboBox1.Text
End Sub
End Class

如果您有任何问题,请告诉我,我会尽我所能尽快回复您。
快乐编码!