打开表单时无法为未绑定的文本框分配值

时间:2013-11-29 12:15:06

标签: vba ms-access

我的表单根据用户来自哪里而略有不同 - 所以为了区分,我有一个未绑定的文本框显示1或0.当从需要1的表单打开时,这是代码I使用方法:

Private Sub ProductDetailsButton_Click()
    On Error GoTo Err_ProductDetailsButton_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "BrandProductIndividualDetails"

    stLinkCriteria = "[Ref]=" & Me![Ref]
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    Forms!BrandProductIndividualDetails!OrderCount = 1

Exit_ProductDetailsButton_Click:
    Exit Sub

Err_ProductDetailsButton_Click:
    MsgBox Err.Number & " Error - " & Err.Description
    Resume Exit_ProductDetailsButton_Click

End Sub

我知道为什么会出现“2448 - 无法为此对象赋值”错误?

0 个答案:

没有答案