我有一个使用表格填充的用户表。我添加了一个“下一步”按钮以打开另一个表单,该表单将填充其他三个表,其中用户ID是所有表的主键。我想将ID从第一个表单复制到下一个表单。我是VBA和Access的新手,请帮助。
这是我认为可以使用的代码,但不是。说“成员已经存在”
Option Compare Database
Dim ID As Integer
Dim Name As String
Private Sub Command612_Click()
ID = Form_FRM_Users.UserID.Value
Name = Form_FRM_Users.FullName.Value
Form_FRM_MC_BA_HMT.Meal_Catagories_UserID.Value = ID
Form_FRM_MC_BA_HMT.FullName.Value = Name
DoCmd.OpenForm acForm, "FRM_MC_BA_HMT"
DoCmd.Close acForm, "FRM_Users", acSaveYes
End Sub