Question

当我运行我的程序并让它给我的值（是的，我确实选择了下拉列表中的项目）在组合框中我得到的就是这个，

System.Windows.Forms.ComboBox + ObjectCollection

这是我正在使用的代码

 Dim name As String
        name = cmbworld.Text
        MsgBox(name)

有什么想法吗？

P.S。我用来插入值的代码是

cmbworld.Items.Clear()

     If File.Exists(root + "\setting\world.txt") Then
        For Each line As String In File.ReadLines(root + "\setting\world.txt")
            If line.Length <> 0 Then
                cmbworld.Items.Add(line)
            End If
        Next line
    Else

Answer 1

您发布的代码不能代码中的代码。

举个例子，我收到一条包含我文本文件中一行数据的干净信息。

我收到你的信息的唯一方法是当我执行以下操作时：

MessageBox.Show(cmbworld.Items.ToString)

我会在MsgBox行上设置一个停止调试器并检查值。

Answer 2

此代码将重现此问题：

    Dim name As String
    name = cmbworld.Items.ToString()
    MsgBox(name)

你有一些其他代码错误地分配Text属性的值。您需要索引Items集合。例如：

    cmbworld.Text = cmbWorld.Items(0)

Answer 3

您使用的是错误的属性，请使用SelectedText。

cmbworld.SelectedText

为什么组合框返回错误的值？

3 个答案: