What are you trying to do? Change the source object of a subform control on a main form to load another subform showing a different floor?
Something like this maybe:
Code:
Private Sub NextFloor (strNextFloor as String)
Dim strtowername As String
Select Case strNextFloor
Case "N1", "N2", "N3", "N4", "S1", "S2", "S3", "S4"
strtowername = "Tower" & sNextFloor 'If called NextFloor("N2") this will return TowerN2 which sholud be the name of a fom in your db
Me.sfrmFloorPlan.SourceObject=strtowername
Case Else
'????
End Select
End Sub
To use it called NextFloor(me.cboFloors) where cboFloors is a combo returning your floors (N1,N2,....).
Cheers,