【发布时间】:2016-09-05 15:29:43
【问题描述】:
我正在尝试在 Visual Studio 2015 中使用组合框(我认为这意味着它的 VB6 代码)
我正在尝试从 MySQL ADODB.recordset 构建值列表,我已经能够将它们插入组合框中。
但是,我不知道如何获取或设置组合框中的值。
so cmbGenre.setValue(new Object / id assoiated with a object)
or MsgBox("Current Select value in Combo box is = " & cmbGenre.selectObject)
objGenre 只是一个具有可变 ID 和名称的类(这是 MySQL 表中的所有列
Public Sub refreshCmbGenre(ByVal id As Long)
Call rsSetup(TABLE_GENRES)
cmbGenre.Items.Clear()
rsGenres.Sort = FIELD_NAME
rsGenres.MoveFirst()
Do Until rsGenres.EOF
cmbGenre.Items.Add(New objGenre(rsGenres.Fields(FIELD_ID).Value, rsGenres.Fields(FIELD_NAME).Value))
rsGenres.MoveNext()
Loop
'=====this is the problem code=========================
rsGenres.MoveFirst()
rsGenres.Find("[id]=" & id)
cmbGenre.SelectedText = rsGenres.Fields(FIELD_NAME).Value
'=============================
End Sub
【问题讨论】:
-
VB6 可以追溯到 Visual Studio 6(我认为是在 1998 年左右)。 VBA 基于 VB6。如果用 VS 2015 编写,您的代码是 VB.NET
标签: mysql vb.net visual-studio combobox