Vba 访问表单!不处理更新

Vba 访问表单!不处理更新,vba,forms,ms-access,Vba,Forms,Ms Access,我正在建立一个Access数据库,其中包含一个条目表单和一个更新表单。主表有几个字段,这些字段是通过VBA从数据输入表单上的数据生成的-简短示例: Private Sub Network_Selection_Exit(Cancel As Integer) PBlue_Network = Forms!frmDataEntry!PBlue_Network ------------------------------- Form_sbfNetwork Selection Private Sub

我正在建立一个Access数据库,其中包含一个条目表单和一个更新表单。主表有几个字段,这些字段是通过VBA从数据输入表单上的数据生成的-简短示例:

Private Sub Network_Selection_Exit(Cancel As Integer)

PBlue_Network = Forms!frmDataEntry!PBlue_Network

-------------------------------

Form_sbfNetwork Selection

Private Sub Existing_Click()
' Only pull documentation for Requested Networks
If Not Existing = "Existing" Then
If Network_CD = 1 Then Forms!frmDataEntry!PBlue_Network = "AI"
End If          
Form_sbfNetWork_Update

Private Sub Existing_Click()
' Only pull documentation for Requested Networks
If Not Existing = "Existing" Then
If Network_CD = 1 Then Forms!frmProvUpdate!PBlue_Network = "AI"
End If

----------------------------------------------

Form_frmProvUpdate

Private Sub Network_Updates_Exit(Cancel As Integer)

PBlue_Network = Forms!frmProvUpdate!PBlue_Network
数据输入表单工作正常,但更新表单使用几乎相同的代码为我提供了一个2465:

Form_sbfNetWork_Update

Private Sub Existing_Click()
' Only pull documentation for Requested Networks
If Not Existing = "Existing" Then
If Network_CD = 1 Then Forms!frmProvUpdate!PBlue_Network = "AI"
End If

----------------------------------------------

Form_frmProvUpdate

Private Sub Network_Updates_Exit(Cancel As Integer)

PBlue_Network = Forms!frmProvUpdate!PBlue_Network

我不确定哪里出了问题,但更新始终会给出2465个错误

仔细检查更新表单上是否有控件实际命名为PBlue_Network。检入设计视图/属性页。调用一个控件源可能与控件名不同。请仔细检查更新表单上是否有控件实际命名为PBlue_Network。检入设计视图/属性页。调用控制源可能与控制名称不同。
Form_sbfNetWork_Update

Private Sub Existing_Click()
' Only pull documentation for Requested Networks
If Not Existing = "Existing" Then
If Network_CD = 1 Then Forms!frmProvUpdate!PBlue_Network = "AI"
End If

----------------------------------------------

Form_frmProvUpdate

Private Sub Network_Updates_Exit(Cancel As Integer)

PBlue_Network = Forms!frmProvUpdate!PBlue_Network