Combobox 无法为组合框设置值

Combobox 无法为组合框设置值,combobox,vb6,Combobox,Vb6,这是我正在处理的一个旧的Vb6应用程序,我在为组合框设置值方面有点困难 我首先将数据加载到combobox—请注意—我只是在combobox中设置文本值,没有ID。下面是代码的样子 Dim z As Integer Dim a As Integer oCombobox.Clear oCombobox.AddItem "", 0 Call GetValuesForCbo Do While Rs.EOF = False z = z + 1 oCombobox.AddItem "

这是我正在处理的一个旧的Vb6应用程序,我在为组合框设置值方面有点困难

我首先将数据加载到combobox—请注意—我只是在combobox中设置文本值,没有ID。下面是代码的样子

Dim z As Integer
Dim a As Integer

oCombobox.Clear
oCombobox.AddItem "", 0

Call GetValuesForCbo

Do While Rs.EOF = False
    z = z + 1
    oCombobox.AddItem "", z

    For a = 0 To oCombobox.ColumnCount - 1
        oCombobox.List(z, a) = Rs.Fields(a).Value
    Next

    Rs.MoveNext
Loop
发生的事情是,我有一个函数,在这里我传递一个ComboxName,也称为oCombobox。在CallValuesForCBO中,我查询数据库以获取值

The values are definitely there because I don't get an error when i do this...

m_stringValue = 'Hello' <--this is one of the values I load into combobox
cboName.Value = m_stringValue <-- while this does not throw an error, it does not display any value in the cbo
这些值肯定存在,因为我这样做时不会出错。。。

m_stringValue='Hello'
VB.ComboBox
没有
ColumnCount
属性。

VB.ComboBox
没有
ColumnCount
属性。

你知道VB的对象浏览器吗?尝试探索ComboBox类Members@deblocker不知道我是否用过。我正在尝试使这个函数工作-当我想要选择它时,它在加载combobox时工作得非常好,但是当我设置值时它不会这样做。在属性中,列设置为1。有什么不对的?负面评论?请解释你知道VB的对象浏览器吗?尝试探索ComboBox类Members@deblocker不知道我是否用过。我正在尝试使这个函数工作-当我想要选择它时,它在加载combobox时工作得非常好,但是当我设置值时它不会这样做。在属性中,列设置为1。有什么不对的?负面评论?请解释一下,这是combobox 2.0或SScombobox-无论正确的名称是什么…VS6安装程序的创建者?向上投票!是的,这是combobox 2.0或SScombobox-无论正确的名称是什么…VS6安装程序的创建者?向上投票!