I have created forms with subforms which have some objects that have VB, such as:
Private Sub Command10_Click()
'On Error GoTo Err_Calculate_Click
'MsgBox (Forms(Me.Parent.Name).Controls("RcptCRDistrict Subform1").Form!RcptNumber)
If IsNull(Forms(Me.Parent.Name).Controls("RcptCRDistr ict Subform1").Form!RcptNumber) = True Then
MsgBox ("Enter Last Name") 'Me.Text8 = 0
Forms(Me.Parent.Name)!CarrierLName.SetFocus
Exit Sub
End If
Me.Text8 = DSum("Charge", "RcptCRDistrict", "[RcptNumber] = " & Forms(Me.Parent.Name).Controls("RcptCRDistrict Subform1").Form!RcptNumber)
Me.Refresh
'Exit_NewCaseNumber_Click:
'Err_Calculate_Click:
'MsgBox Err.Description
'Resume Exit_Calculate_Click
End Sub
They work great, until I created a navigation form, and now none of the VB works. I assume that now the navigation form is the parent, the former parent is now the subform, and the subform is what? Should I create the forms on the navigation form first from now on to avoid having to change VB based objects?
Thanks
Wayne