Question

Week 5 Programming Lab - Broadway Ticket Group Discount ( Web Design With Visual Basic)

Submit Assignment

• Due No Due Date
• Points 100
• Submitting a text entry box or a file upload

Complete the following case programming assignment. To upload and submit the program and materials you created, click the Choose File button to find and select your saved documents. Make sure that the files are saved with your last name in the file name (Example: ch4_case1_Jones.doc).

BROADWAY TICKET GROUP DISCOUNT

Based on the case project shown in Figure 5-100, create a requirements document and a Use Case Definition document and then design a Windows application. Before writing the code, create an event-planning document for each event in the program.

To create a perfect evening for your group, the Broadway Ticket Group Discount Program offers a discount based on group size for excellent orchestra seating. The following table specifies the cost per person. Write this program using Case statements for the total cost of the tickets sold as a group. Do not accept requests for negative values or 100+ tickets. Group Size Broadway Tickets per Person 1-8 $249 9-12 $219 13-24 $199 25-99 $169 FIGURE 5-100

Answer 1

Code :-

Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim TicketNo As Double = TextBox1.Text 'decelare ticket value
Dim value As String = ComboBox1.Text 'decelare age range
Dim ticketPrice As Long
If (TicketNo >= 1 AndAlso TicketNo <= 100) Then 'validate no of tickets
Select Case value ' check range based on value using case
Case "1-8"
ticketPrice = 249 * TicketNo ' calculate the final ticket amount
MessageBox.Show("Ticket Price = $" + ticketPrice.ToString())
Case "9-12"
ticketPrice = 219 * TicketNo
MessageBox.Show("Ticket Price = $" + ticketPrice.ToString())
Case "13-24"
ticketPrice = 199 * TicketNo
MessageBox.Show("Ticket Price = $" + ticketPrice.ToString())
Case "25-99"
ticketPrice = 169 * TicketNo
MessageBox.Show("Ticket Price = $" + ticketPrice.ToString())
Case Else
MessageBox.Show("Please Select valid range")
End Select
Else
MessageBox.Show("Please put ticket range 1-100 only")
End If
End Sub
End Class

Output :-

0 Form1 x BROADWAY TICKET COUNTER Select Age Group 13-24 No of Tickets 20 Book Ticket

x 0 Form1 BROADWAY TICKET COUNTER Select Age Group : 13-24 No of Tickets: 20 Book Ticket х Ticket Price = $3980 OK

Form1 x 0 BROADWAY TICKET COUNTER Select Age Group : 13-24 No of Tickets: 200 Book Ticket X Please put ticket range 1-100 only OK

Source Code screen shot :-

Public class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.click Dim TicketNo As Double = textBox1.Text 'decelare ticket value Dim value As String = ComboBox1.Text 'decelare age range Dim ticketPrice As Long If (TicketNo >= 1 AndAlso TicketNo <= 100) Then 'validate no of tickets Select Case value' check range based on value using case Case "1-8" ticketPrice = 249 * TicketNo calculate the final ticket amount MessageBox.Show("Ticket Price = $" + ticketPrice.ToString() Case "9-12" ticketPrice = 219 * TicketNo MessageBox.Show("Ticket Price $" + ticketPrice.ToString() Case "13-24" ticketPrice = 199 * TicketNo MessageBox.Show("Ticket Price $" + ticketPrice.ToString() Case "25-99" ticketPrice = 169 * TicketNo MessageBox.Show("Ticket Price $" + ticketPrice.ToString() Case Else MessageBox.Show("Please Select valid range") End Select Else MessageBox.Show("Please put ticket range 1-100 only") End If End Sub End Class