1 / 15

Create a Comprehensive Customer Order Form with Access VBA Code

This guide outlines the step-by-step process to create a user-friendly order form in Microsoft Access that integrates customer search and order management functionalities. You will design the `qryFindCustomer` query to locate customers and link it to the `frmFindCustomer` form with a selection button. Additionally, you will create `frmTemporaryItems`, using combo boxes and input fields to capture order details and calculate totals dynamically. The appendices include VBA code snippets for events and data management to ensure smooth user interaction.

lucia
Télécharger la présentation

Create a Comprehensive Customer Order Form with Access VBA Code

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. Advanced Forms Create query that looks like the following. Call it qryFindCustomer

  2. Advanced Forms Create a form based on the query you have just created and add a button to it like this. Call it frmFindCustomer btnSelect

  3. Advanced Forms Create a form as shown below – call it frmTakeOrder pagChooseCustomer & pagChooseItems TabControl btnFind txtSurname txtFirstName Subform – frmFindCustomer

  4. Advanced Forms Add the following as criteria to the query qryFindCustomer

  5. Advanced Forms Add the following code as an event for the button btnFind Private Sub btnFind_Click() [frmFindCustomer].Requery End Sub

  6. Advanced Forms Create the following table - tblTemporaryItems Note the Default value for “Medium”

  7. Advanced Forms Create a new form called frmTemporaryItems. Make the form default view – Continuous Forms Make the record source for the form tblTemporaryItems

  8. Advanced Forms Create a new form called frmTemporaryItems. Make the form default view – Continuous Forms Make the record source for the form tblTemporaryItems Add the head and footer.

  9. Advanced Forms Add a combo box - cmbDescription

  10. Advanced Forms Add a combo box

  11. Advanced Forms Add the following values to the data tab in the combo box object. Control Source – Description Bound Column - 2

  12. Advanced Forms Add three more input boxes and bind them to Medium, Price and Qty respectively on their Control Source (Data tab)

  13. Advanced Forms Add the following code as an update event for the combo box. This will update the table with the rest of the data. Private Sub cmbDesciption_Click() Me.txtMedium = Me.cmbDesciption.Column(2) Me.txtPrice = Me.cmbDesciption.Column(3) Me.txtQty = CInt(InputBox("Enter in Quantity", "Quantity", 1)) DoCmd.RunCommandacCmdSaveRecord End Sub

  14. Advanced Forms Add another inputbox (txtTotal) make the format currency and put the following as the control source =[Price]*[Qty]

  15. Advanced Forms In the footer – add another textbox (txtGrandTotal) and make the format currency. Add the following formula into the Data Source =sum([Price]*[Qty])

More Related