Set tabbed page to invisible

[kev]

Hi folks,

Firstly, a great thanks to all members of this group who has been of
great help to me. Due to your help, i have been able to proceed with my
project.
Now, i have another question.Please help
I have a form with 10 tabs on it. I use this tabbed
form"frmSL1Registration" to display all the records that have been
submitted. My question here is how do i make the tab page(any
particluar tab page) to appear invisible if there is no records
available for this particular page?

My tabbed page is "Level1Punchlist"
The controls on it is text
box-"Issue","Responsibility","CompletionDate"
Thus, you can see that if user does not have any issue, these fields
will be left blank and when displayed, these boxes will apear empty.

Please help asap.
Thanks in advance:)

[King Ron]

how do i make the tab page(any

particluar tab page) to appear invisible if there is no records
available for this particular page?

My tabbed page is "Level1Punchlist"
The controls on it is text
box-"Issue","Responsibility","CompletionDate"
Thus, you can see that if user does not have any issue, these fields
will be left blank and when displayed, these boxes will apear empty.

Please help asap.

Assuming your form is named frmMyForm, the 'Issue' text box is named
'txtIssue', the Tab control is 'tabMain' and the page you want to hide
is 'pgLevel1Punchlist', something like this in the form_OnCurrent
event:

<uncompiled code>

Private Sub frmMyForm_OnCurrent()
If (IsNull(Me.txtIssue) = True) then
Me.tabMain.pgLevel1Punchlist.Visible = False
Else
Me.tabMain.pgLevel1Punchlist.Visible = True
End If
End Sub

</uncompiled code>

If the text box txtIssue is located on the page to be hidden, just
remember you'll need some external way to fill in that value since if
it's blank, that text box won't show. Insert that control on the
containing form rather than on a tab page.

R KoC

[kev]

Hi King Ron,

I tried the method below but it doesnt hide the tabbed page when the
textbox issue is null.
can you please help?

p/s: sorry this seems like an old issue but i just managed to get my
hands on it as i was handling another short project.

Thanks.

King Ron wrote:

how do i make the tab page(any
particluar tab page) to appear invisible if there is no records
available for this particular page?

My tabbed page is "Level1Punchlist"
The controls on it is text
box-"Issue","Responsibility","CompletionDate"
Thus, you can see that if user does not have any issue, these fields
will be left blank and when displayed, these boxes will apear empty.

Please help asap.

Assuming your form is named frmMyForm, the 'Issue' text box is named
'txtIssue', the Tab control is 'tabMain' and the page you want to hide
is 'pgLevel1Punchlist', something like this in the form_OnCurrent
event:

<uncompiled code>

Private Sub frmMyForm_OnCurrent()
If (IsNull(Me.txtIssue) = True) then
Me.tabMain.pgLevel1Punchlist.Visible = False
Else
Me.tabMain.pgLevel1Punchlist.Visible = True
End If
End Sub

</uncompiled code>

If the text box txtIssue is located on the page to be hidden, just
remember you'll need some external way to fill in that value since if
it's blank, that text box won't show. Insert that control on the
containing form rather than on a tab page.

R KoC

[kev]

Hi King Ron,

I have tried d method that you suggested below but it is not working,
the tabbed page is still visible althought the textbox is empty.

Please help.

p/s: sorry for very late respond, i was assigned another project thus
this was on hold.

Thanks.

King Ron wrote:

how do i make the tab page(any
particluar tab page) to appear invisible if there is no records
available for this particular page?

My tabbed page is "Level1Punchlist"
The controls on it is text
box-"Issue","Responsibility","CompletionDate"
Thus, you can see that if user does not have any issue, these fields
will be left blank and when displayed, these boxes will apear empty.

Please help asap.

Assuming your form is named frmMyForm, the 'Issue' text box is named
'txtIssue', the Tab control is 'tabMain' and the page you want to hide
is 'pgLevel1Punchlist', something like this in the form_OnCurrent
event:

<uncompiled code>

Private Sub frmMyForm_OnCurrent()
If (IsNull(Me.txtIssue) = True) then
Me.tabMain.pgLevel1Punchlist.Visible = False
Else
Me.tabMain.pgLevel1Punchlist.Visible = True
End If
End Sub

</uncompiled code>

If the text box txtIssue is located on the page to be hidden, just
remember you'll need some external way to fill in that value since if
it's blank, that text box won't show. Insert that control on the
containing form rather than on a tab page.

R KoC