Different approach - Microsoft Access Expert 9


	Back to Access Expert 9 Comments List

Upload Images @Reply Bookmark Link Email Next Unseen

Different approach

Maurice Loucel

3 years ago

My approach to the challenge (lesson 5) was different than yours, I thought, why keep the menu as an entry form so I create a form for defaults so I can change them any time, then display those defaults on the menu and anywhere I want, like the report.
Then on the report OrderR, instead of creating a new field on the Query, I created an unbound label and as a control source used: =IIf([IsPaid],"PAID","NOT PAID") and format accordingly, of course I added: DefaultT to the OrderQ with the fields I need [all of them].
For the Quote I figure out there is a conflict when both fields are checked, so I use a bit of VBA to disable Paid/Unpaid so it won't cause a conflict.

I am learning a lot, still I need more, but is a work in progress.

Thanks Richard, hope you see my comment.
it works

Maurice Loucel OP @Reply

3 years ago

FORGOT to mention:
when I said CONFLICT, I meant stop the user (even if it doesn't matter) from clicking the is paid button, I also made the label of quotation change the label depending on if the check box is true or false, this is my code:

Changed the Label name on the form to QILabel [make it meaningful]

Private Sub IsQuotation_Click()
    ' make sure the form is not dirty

    Refresh
    Select Case IsQuotation
        Case True
            ' Disable the checkbox and change the label caption to Is Quotation
            Forms!orderf!IsPaid.Enabled = False
            Forms!orderf!QILabel.Caption = "Is Quotation"
        Case Else
            ' Enable the checkbox and change the label caption to Invoice
            Forms!orderf!IsPaid.Enabled = True
            Forms!orderf!QILabel.Caption = "Invoice"
    End Select

End Sub

	Richard Rost @Reply 3 years ago
Nice. That's the beautiful thing about Access... lots of ways to accomplish goals.

This thread is now CLOSED. If you wish to comment, start a NEW discussion in Access Expert 9.

Next Unseen

New Feature: Comment Live View