Thanks in advance

A form with a 'Delete' button has two tabs, 'tab1' and 'tab2'.

(Goal)
In the tab2, 'Delete' button is greyed out and disabled.
In the tab1, 'Delete' button is enabled.

On Mon, 28 Jul 2008 18:02:00 -0700, Jay
<(E-Mail Removed)> wrote:

>Thanks in advance
>
>A form with a 'Delete' button has two tabs, 'tab1' and 'tab2'.
>
>(Goal)
>In the tab2, 'Delete' button is greyed out and disabled.
>In the tab1, 'Delete' button is enabled.
>

You need two buttons, one on each tab page.

--

John W. Vinson/MVP

(...)
>>A form with a 'Delete' button has two tabs, 'tab1' and 'tab2'.
>>
>>(Goal)
>>In the tab2, 'Delete' button is greyed out and disabled.
>>In the tab1, 'Delete' button is enabled.
>>
>
> You need two buttons, one on each tab page.
>

Or use change event of tab control:

Private Sub ctrTab_Change()
Me!cmdDelete.Enabled = (Me!ctrTab = 0)
End Sub

K.P.
www.access.vis.pl

Thank you, K.P.

I am new to VBA area and I may not understand your idea.

When I open a Tab page, it has only five events: Click, Double Click, Mouse
Up,Mouse Down, Mouse Move.

Thank again.


"Krzysztof Pozorek [MVP]" wrote:

> (...)
> >>A form with a 'Delete' button has two tabs, 'tab1' and 'tab2'.
> >>
> >>(Goal)
> >>In the tab2, 'Delete' button is greyed out and disabled.
> >>In the tab1, 'Delete' button is enabled.
> >>
> >
> > You need two buttons, one on each tab page.
> >
>
> Or use change event of tab control:
>
> Private Sub ctrTab_Change()
> Me!cmdDelete.Enabled = (Me!ctrTab = 0)
> End Sub
>
> K.P.
> www.access.vis.pl
>
>
>

Yes, Tab page has only this five events, but Tab control has nine events:
Change, Click, DblClick, KeyDown, KeyPress, KeyUp, MouseDown, MouseMove,
MouseUp.

Use Change event of Tab control.

K.P.


> I am new to VBA area and I may not understand your idea.
>
> When I open a Tab page, it has only five events: Click, Double Click,
> Mouse
> Up,Mouse Down, Mouse Move.
>
> Thank again.
>
>
> "Krzysztof Pozorek [MVP]" wrote:
>
>> (...)
>> >>A form with a 'Delete' button has two tabs, 'tab1' and 'tab2'.
>> >>
>> >>(Goal)
>> >>In the tab2, 'Delete' button is greyed out and disabled.
>> >>In the tab1, 'Delete' button is enabled.
>> >>
>> >
>> > You need two buttons, one on each tab page.
>> >
>>
>> Or use change event of tab control:
>>
>> Private Sub ctrTab_Change()
>> Me!cmdDelete.Enabled = (Me!ctrTab = 0)
>> End Sub
>>
>> K.P.
>> www.access.vis.pl
>>
>>
>>