CSIS 208 Programming Assignment 7

Description

The database Microland.accdb is maintained by the Microland Computer Warehouse, a mail-order computer-supply company. The illustrations below show data in the Customers table and the Orders Table in the database. The table identifies each customer by an ID number and gives, in addition to the name and address, the total amount of purchases during the current year. The Order table provides the customer id and the item ordered.
The database that contains the table for this assignment is contained within your Instructions folder and should be placed in your project’s bindebug folder.
**To receive any points for this assignment you must do the following:
For this assignment you will open the attached Microsoft Access file and add your name and your instructors name in the customers table using the following information:
CustID
Name
Street
City
AmtPurchase
You must also add the following lines to the Orders table
CustID,
itemID,
Quantity
Write a Visual Basic program that will:
On the form_load event, display in a listbox the customers’ names that are listed in the Customers table.
When the user selects a customer from the listbox,the customer’s name, street, city, and purchases should be displayed in the textboxes to the right of the buttons as illustrated below.
The customer and the order table are joined and the orders for the customer are displayed in the atagrid. The datagrid should have headers for the data as shown below.
The purchases should be formatted to be currency.
A Display Total Purchases should be included to sum up all of the total purchases for all names listed in the lstOutput. This information should be displayed in a message box.
A Clear button should be included to clear all of the textboxes and datagrid. [Note that it should not clear the listbox containing the customers’ names.]
A Close button should be included to exit the application.
As in all of your assignments, make sure that you have used appropriate programming techniques (i.e. naming of controls and variables, form has a title, tab order of controls is appropriate, textboxes used for display purposes are not writeable, internal documentation/comments are clear, formatting of any currency fields, etc.)
SCREENSHOTS
SOLUTION
PAYMENT
The solution includes a Visual Studio (VB) project
Attachments [Move over files to preview content of those files]
CSIS208_Programming_Assignment_7.zip (246.14 KB)
CSIS208-Programming-Assignment-7-Screenshot-1.png
CSIS208-Programming-Assignment-7-Screenshot-2.png
CSIS208-Programming-Assignment-7-Screenshot.png
Visual Studio project
CSIS208ProgrammingAssignment7
CSIS208ProgrammingAssignment7
App.config
bin
Debug
CSIS208ProgrammingAssignment7.vshost.exe
CSIS208ProgrammingAssignment7.vshost.exe.config
CSIS208ProgrammingAssignment7.vshost.exe.manifest
MICROLAND.accdb
Release
CSIS208ProgrammingAssignment7.vbproj
Microland.Designer.vb
Microland.vb
My Project
Application.Designer.vb
Application.myapp
AssemblyInfo.vb
Resources.Designer.vb
Settings.Designer.vb
Settings.settings
obj
Debug
CSIS208ProgrammingAssignment7.vbproj.FileListAbsolute.txt
DesignTimeResolveAssemblyReferences.cache
DesignTimeResolveAssemblyReferencesInput.cache
TempPE
MICROLANDDataSet.Designer.vb.dll
My Project.Resources.Designer.vb.dll
CSIS208ProgrammingAssignment7.sln
CSIS208ProgrammingAssignment7.v12.suo
Preview Microland.vb
xxxxxxxxxxx.xxxx = xxxx
xxx xxxxxx xx xxxxxx
xxx xxxxx xx xxxxxx = “xxxxxx * xxxx xxxxxxxxx xxxxx (xxxx = ‘” & xxxx & “‘)”
xxx xxxxxxxxxxxxxxxx xx xxxxxx = “xxxxxxxx=xxxxxxxxx.xxx.xxxxx.12.0;xxxx xxxxxx=xxxxxxxxx.xxxxx”
Dim connection As OleDbConnection Try connection = New OleDbConnection(connectionString) Dim command As OleDbCommand = connection.CreateCommand command.CommandText = query
Dim reader As OleDbDataReader If connection.State = ConnectionState.Closed Then connection.Open() End If reader = command.ExecuteReader
xxxxx xxxxxx.xxxx()
xxxxxxxxxxxxxx.xxxx = xxxxxx.xxxx(“xxxxxx”)
xxxxxxxxxxx.xxxx = xxxxxx.xxxx(“xxxx”)
xxxxxxxxxxxxxxx.xxxx = “$” & xxxxxx.xxxx(“xxxxxxxxxxxx”)
xxxxxx = xxxxxx.xxxx(“xxxxxx”)
xxx xxxxx
Price: $19
Buy Now
Checkout
Added to cart
Buy More Save More
Buy at least TWO items & save up to 30% OFF your ENTIRE order!
Rack up instant rebates in your shopping cart. Simply add items to your cart, and see the savings add up.
Discounts will automatically be applied on eligible orders.
CSIS 208 Programming Assignment 7 – $19.00
CSIS 208 Programming Assignment 8 – $19.00
CSIS 208 Course Project  – $29.00
Add to Cart
Checkout
Added to cart
You May Also Like:
CSIS 208 Final Exam
CSIS 208 Programming Assignment 1
CSIS 208 Programming Assignment 2
CSIS 208 Programming Assignment 3
CSIS 208 Programming Assignment 4
CSIS 208 Programming Assignment 5
CSIS 208 Programming Assignment 6
CSIS 208 Programming Assignment 8
CSIS 208 Course Project