2012-05-16 109 views
4
Private Sub Form_Open(Cancel As Integer) 
    Me.Bathroom = Forms!frmBathrooms!ID 
    Me.txtBathInfo.Caption = "Bathroom Room Number: " & 
     DLookup("Room", "tblRooms", "ID = " & 
      DLookup("Room", "tblBathrooms", "ID = " & Me.Bathroom)) 
    Me.RecordSource = "SELECT * FROM tblStalls WHERE Bathroom = " & Me.Bathroom 
    Me.Recordset.AddNew 
End Sub 

其中第2行Me.Bathroom = Forms!frmBathrooms!ID正在跳闸错误。调试器Me.Bathroom = 1, Forms!frmBathrooms!ID = 38。基本上我试图自动使这个表单的浴室字段与frmBathrooms表单的ID相匹配。 “我”是浴室物品的一种形式;可以有很多项目。错误2448:无法为此对象分配值...为什么不?

地狱是如何抛出一个错误?我找不到任何东西在一个小时左右的搜索周围放松。我理解这个信息,但不知道这可能会如何抛出它?

Item表的Bathroom字段位于表单的记录源等。Ideas?

+0

什么样的领域是你的桌子上的浴室? –

+0

这是一个查找字段(我知道他们不太好用,但这真的是一个严格的Access数据库,所以我没有看到伤害)包含tblBathrooms.ID的数字自动编号。我实际上已经明白了这一点......输入这个问题并等待4分钟,然后点击。将提供答案。 – StuckAtWork

+0

好吧这个论坛缺乏声誉的东西现在让我很紧张..只是想显示答案作为一个答案..对于任何其他人有同样的问题,我所做的只是将字幕2和3移动到下面Me.Recordset.AddNew(以便它在更改Me.Bathroom和标题之前更改源并添加新记录)。如果其他人可以请在答案中写出这个问题,很容易。15 – StuckAtWork

回答

2

对于其他人有同样的问题,我所做的只是将第2行和第3行移动到Me.Recordset.AddNew下面(这样它会更改源并在更改Me.Bathroom和标题之前添加新记录) 。 - user1394455

1

有同样的问题,但它与VBA语法无关。 我试图在窗体上设置一个控件(ordernumber)。 此订单号必须计算,我在VBA中进行。 经过计算,我会尝试在窗体上设置控件(ordernumber)。这在运行时触发了2448错误。 随后我发现在表单设计中,我已经将控制源设置为一个计算。所以运行时VBA不允许我设置控件。 在窗体设计 - >属性表窗口中,控件的控件源中的计算被移除后,它工作正常。 我承认,真的很愚蠢的错误,但你有它。 希望这会有帮助 --X--

相关问题