Me.Caption In a Form

B

Bob Vance

My Form is used for 2 Me.Caption
1 Me.Caption = "Distribute Through Owner.."
2 Me.Caption = "Holding Invoices"
I want this AfterUpdate only to work with , Me.Caption = "Holding Invoices"
and not with the other
Is this possible to code?

Private Sub lstModify_AfterUpdate()
Me.cmdEmail.Visible = IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
Me.lblEmailOption.Visible =
IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
Me.cmbEmailOption.Visible =
IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
Me.lblEmailAvailable.Visible =
IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
End Sub
 
M

Mr. B

Bob,

I am not sure that I fully understand what you are wanting to do , but if
you just want to start with the first caption showing on your form and then
use the AfterUpdate event of the lstModify control to change it to the other
caption, then just put the first caption in the form.

The in the AfterUpdate event of the control, just use
Me.Caption = "Holding Invoices"

-----
HTH
Mr. B
http://www.askdoctoraccess.com/
Doctor Access Downloads Page:
http://www.askdoctoraccess.com/DownloadPage.htm
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Intresting Visible problem 0
Add 2 Conditions together 1
Visible Problem! 3
Visible Question 1
Adding a CC to email code! 7
Scroll Records! 0
Label to show IF 6
Enter Date on Emailing 6

Top