TAB Controls
Aspindale
Name-----Text
Address------Text
Age--------Long
HasComputerSkils ---- Yes/No
I would like to place a TAB control over this with 2 pages.
Page1 caption is "HasSkills"
Page2 caption is "NoSkills"
because these 2 pages are transparent I can see my input area nicely.
When I click on the HasSkills TAB I want to filter only those with Computer
skills
(and NoSkills TAB those without).
The problem is that altho there is an OnClick event for my TAB page - it
simply does not work!!!!
ie. I have code in the OnClick but it never gets there (to my debugged
OnClick code)
What am I missing here?
I need to do it with TABS. Any ideas will be welcome.
Dale
aspi...@saol.com
Steve Mazzola
to by name or index.
Steve
In article <8880o6$lf3$2...@ctb-nnrp2.saix.net>,
Sent via Deja.com http://www.deja.com/
Before you buy.
john....@southlanarkshire.gov.uk
Private Sub PageTabs_Change()
Select Case PageTabs.Value
Case 0 : ' Page 1 of tab
Case 1 : ' Page 2 of tab
' etc, etc...
End Select
End Sub
Arvin Meyer
---
Arvin Meyer
Aspindale wrote in message <8880o6$lf3$2...@ctb-nnrp2.saix.net>...
Aspindale
Trevor replied to that post but with some message he obviously got mixed up.
I can't see it anywhere - please cut and paste to me.
Most appreciated
Dale
aspi...@saol.com
Arvin Meyer <a...@m.com> wrote in message
news:8883nl$5c9$1...@nntp9.atl.mindspring.net...
Arvin Meyer
Private Sub TabCtl_Change()
MsgBox "Clicked Tab# " & Me.TabCtl + 1
End Sub
---
Arvin Meyer
Aspindale wrote in message <88apfl$qlc$1...@ctb-nnrp2.saix.net>...
Trevor Best
news:88apfl$qlc$1...@ctb-nnrp2.saix.net...
> Thanks Arvin, I wish I could find it.
> Trevor replied to that post but with some message he obviously got mixed
up.
> I can't see it anywhere - please cut and paste to me.
> Most appreciated
Dale, Arvin's talking about your other thread you started on the same
subject with the same question, I'll paste my last reply again. (hint:
F3/Shift-F3 for find in OE)
<------ begin paste ----
Sorry, Quite right, we do get carried away sometimes. I generally use a
generic function in the Onchange property, I have controls with the tag that
contains things like ":tab.tbsItems=0:" or ":tab.tbsItems=1: depending on
what tab they relate to. I need this for subforms as if the subform is
actually in the tab then screen resizing doesn't work.
e.g. for tbsItems I use "=GenTabchange([Form],[tbsitems])"
Note, this is on the TabStrip control itself, not any of the pages within
the tab strip.
Function GenTabChange(pfrm As Form, pctl As Control)
Dim ctl As Control, i As Long
Dim strTabCtlName As String
Dim strTest As String
strTabCtlName = pctl.Name
strTest = ":tab." & strTabCtlName
For Each ctl In pfrm.Controls
i = InStr(1, ctl.Tag, strTest)
If i Then
i = i + 6 + Len(strTabCtlName)
i = Val(Mid$(ctl.Tag, i))
ctl.Visible = (pctl.Value = i)
End If
Set ctl = Nothing
Next
End Function
This is really what Arvin has said but only in more detail.
--
Trevor Best - tre...@besty.org.uk
http://www.besty.org.uk
http://www.trevor.easynet.co.uk
Aspindale <aspi...@saol.com> wrote in message
news:8880o4$lf3$1...@ctb-nnrp2.saix.net...
> I don't know how this link get hooked up with my original posting?
> Can anyone give some input to my original posting
> Dale
> aspi...@saol.com
>
> Trevor Best <tre...@besty.org.uk> wrote in message
> news:887gc3$1utp$4...@quince.news.easynet.net...
> > David W. Fenton <dXXXf...@bway.net> wrote in message
> > news:8ED9ACA12df...@news1.bway.net...
> > >
> > > Why not a regular integer? Are you expecting to be including
> > > archeological finds in your database, so that you have someone over
> > > 32,767 years of age?
> >
> > A mergre pup, I'm over four and a half billion years old so even a long
> > integer doesn't do me justice.
> >
> > --
> > Q - q...@the.q.continuum.net
-------- end paste ------------>
--
Trevor Best - tre...@besty.org.uk
http://www.besty.org.uk
http://www.trevor.easynet.co.uk