Question

我试图简单地从一种表单中检索数据并在另一种表单上填写字段，以便当我在数据库中创建新记录时，将保留某些信息。

我想使用类似Me.AlbumID = albumNumber的名称，其中albumNumber是一个变量，用于存储其他形式的值，但是我不断收到错误2448的提示，说我无法为该字段赋值。

我尝试了多种不同的语法更改，并尝试擦除了仅是文本框的控制框中的绑定，但似乎无法弄清楚问题出在哪里。我想这可能很简单，但到目前为止，我还处于困境。

目前我有（用vba编写）：

Private Sub AddTracksButton_Click()
    Dim albumNumber As Integer
    albumNumber = Me.AlbumID
    DoCmd.OpenForm "TracksEditor", acNormal, "", "", , acNormal
    DoCmd.GoToRecord , "", acNewRec
    Me.AlbumID = albumNumber
End Sub

将值赋值并结转到新表格，例如1或2，依此类推，但问题是，然后应用看起来像Me.AlbumID = albumNumber的行将引发错误2448。该控件绑定到该字段，因为理想情况下我想直接编辑该字段。

建议？

Answer 1

这实际上结束了工作，我用SQL编写了直接访问数据库的方法，而不是尝试通过from。事实证明，您可以使它看起来像这样，它将起作用：

Private Sub AddTracksButton_Click()
    Dim albumNumber As Integer
    albumNumber = Me.AlbumID
    DoCmd.OpenForm "TracksEditor", acNormal, "", "", , acNormal
    Dim SQL As String
    SQL = "INSERT INTO Tracks (AlbumID) VALUES (" & albumNumber & ")"
    DoCmd.RunSQL SQL
End Sub

希望这对其他人有帮助。

错误2448无法为Access VBA中的字段/控件分配值

1 个答案: