访问VBA,在选择组合框值时显示一个字段

时间:2015-06-22 15:36:13

标签: vba ms-access access-vba

我想在选择listbox中的值时显示combobox。我输入了这段代码:

Private Sub categoriebox_AfterUpdate()

    If categoriebox.Value = "MON" Then
        Me.monstertype.Visible = True
    Else: Me.monstertype.Visible = False

    End If

End Sub

然而,我一直收到错误:

  

运行时错误13:输入不匹配

combobox选项取自表格。此表中的字段为IDcategorydescription。我需要的值来自类别:MON,Monster的缩写,但由于这是在同一形式的combobox中选择的,我还需要定义吗?

我也尝试过使用ID = 14,但这也行不通。

1 个答案:

答案 0 :(得分:0)

你的代码是正确的。

但是,组合框值设置为绑定列号,您可能已在组合框的行源属性上选择了多个列。这会将ID号与文本“MON”进行比较 - 导致类型不匹配。

答案:只选择类别作为行源或选择不同的绑定列号。

e.g。

ID ||类别||说明

将组合框绑定列属性设置为2.现在组合框的值是类别列的内容。