You don't need activecontrol:

If Me.MultiPage1.SelectedItem.ActiveControl.Name = "fraOneDayTwoDay" Then
If fraOneDayTwoDay.TabIndex = 3 Then
lblOneDayBack.Visible = True
Else
lblTwoDayBack.Visible = True
End If
End If

--
Regards,
Tom Ogilvy



"Geoff" wrote:

The following code fails at line 2 with Object vaiable not set and I cannot
find the correct syntax.
The proc refers to 2 optionbutton labels in a frame on a multipage hence
needing to use SelectedItem.

If Me.MultiPage1.SelectedItem.ActiveControl.Name = "fraOneDayTwoDay" Then
If fraOneDayTwoDay.ActiveControl.TabIndex = 3 Then
lblOneDayBack.Visible = True
Else
lblTwoDayBack.Visible = True
End If
End If

T.I.A.

Geoff