时间戳

首页 > 解决方案 > Access VBA 中组合框的动态默认值

vba - Access VBA 中组合框的动态默认值

问题描述

我想为我的组合框设置一个动态默认值：combo11

我用这个：

Me.Combo11.DefaultValue = DLookup(str)

尽管 ：

str = "EmpOperation", "tblEmp", "EmpNom ='" & Me.Label6.Caption & "'"

我对任何非 VBA 解决方案持开放态度。谢谢

完整代码：

Private Sub Form_Current()

        If Not IsNull(Me.OpenArgs) Then
            Me.Label6.Caption = Me.OpenArgs
        End If

        Me!Combo11.DefaultValue = DLookup("EmpOperation", "tblEmp", "EmpNom ='" & Me.Label6.Caption & "'")

End Sub

我得到#NAME？我的combo11的最高值错误

标签： vbams-accessdefault

解决方案

尝试：

Me!Combo11.DefaultValue = Nz(DLookup("EmpOperation", "tblEmp", "EmpNom ='" & Me.Label6.Caption & "'"))

推荐阅读