Question

我已经创建了一个Access数据库（orig.v2007，使用v2010更新，有些用户现在将其与v2013一起使用），这是我的办公室在过去两年中一直使用的，没有这个问题。最近这个问题开始发生：有一个输入数据的表格。表单的记录源是一个表，它有一些文本框，其中包含从其他表中查找数据的函数。对于办公室中只有少数人，具有这些功能的文本框不会自动填充。他们也知道，有这个问题都是使用Access 2013，但不是每个使用2013的人都有这个问题。我仍在使用2010，我不能复制这个问题。

状态栏中的文本框控件来源为=GetSKU([Forms]![frmCP]![Project_Type])，该消息显示＆＃34;计算＆＃34;。（看起来它不是自动计算的。）当用户单击文本框时，它会填充它应该的文本。用户

功能如下：

Function GetSKU(PT As Long)
    Dim ptvar As Variant
    ptvar = DLookup("[SKU]", "[tblProjectType]", "[ProjType_ID] = " & PT)
    GetSKU = ptvar
End Function

Answer 1

本周我的Access数据库遇到了类似的问题。我们最近从Access 2010升级到2013，现在任何执行计算的未绑定文本框（Iif，sum，average，dlookup等）都是空的，直到您单击文本框或点击F9。

MSDN上的

This discussion可能会有所帮助。它建议按F9或重新启动计算机将（暂时）解决问题。

Answer 2

我现在已经把这个问题突然出现了。我有一个解决方法，但它很讨厌，如果进行复杂的表单处理，并不能保证它能很好地解决你的问题。

Private Sub Form_Activate()

    Me.SetFocus
    SendKeys "{F9}"

End Sub

访问2013表单文本框，功能不计算

2 个答案: