One record per tab

[musicloverlch]

I need to create a form with one tab per record. Some items may have
10 tabs and some may have 3. Before I start down this road, is it
possible to do this?

Thanks in advance,
Laura

[Ozzone]

Programmatically you can but it will be very messy. You are looking at
a lot of code to create the tabs, display the bound controls (on
separate tabs) and filter a single record for each tab.

[musicloverlch]

I decided to try something. However, it keeps giving me an error on
the 'Set rs = db.OpenRecordset(strQuery)'. It says, Too few
parameters, expected 1. I gave it one. Any ideas as to what is wrong?

Thanks in advance!

Code:

Private Sub Form_Open(Cancel As Integer)
Dim x As Integer
Dim index As Integer
Dim db As Database
Dim rs As Recordset
Dim strQuery As String
Dim strPage As String

Set db = currentdb

x = 1

Do While x < 40
strQuery = "qryPlanOne_" & x
index = x - 1
Set rs = db.OpenRecordset(strQuery)

If Not rs.BOF Then
Me.tabPlans.Pages.Item(index).Visible = True
Else
Me.tabPlans.Pages.Item(index).Visible = False
End If
rs.close
x = x + 1
Loop

[David W. Fenton]

"Ozzone" <oz**********@yahoo.com> wrote in
news:11*********************@g47g2000cwa.googlegro ups.com:

Programmatically you can but it will be very messy. You are
looking at a lot of code to create the tabs, display the bound
controls (on separate tabs) and filter a single record for each
tab.

Not really.

Create all the tabs you need and set the .Visible properties of each
page as needed.

--
David W. Fenton http://www.bway.net/~dfenton
dfenton at bway dot net http://www.bway.net/~dfassoc