Diner Specials Display
This programming challenge is from a Visual Basic.Net programming course I took in Spring 2008. The Chapter (1) was titled “Introduction to Visual Basic .Net 2005″.
I post these old academic challenges for a few reasons. One is to demonstrate my programming learning, experience, and progression. Another reason is to make sure my code and solutions are indexed by search engines, so that other beginning programmers may get help if they need it.
1.5: Create a project to display the daily specials for “your” diner. Make up a name for your diner and display it in a label at the top of the form. Add a label to display the appropriate special depending on the button that is pressed. the buttons should be:
- Soup of the Day
- Chef’s Special
- Daily Fish
Also include an Exit button.
My solution code:
' Assignment 1
' Problem 1.5
' Kirk Hingsberger
' Display Menu Specials
Public Class specialsForm
Private Sub exitButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles exitButton.Click
' Exits program
Me.Close()
End Sub
Private Sub soupButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles soupButton.Click
' Display Soup of Day
Me.specialsTextLabel.Text = "Kirk's Diner is offering hot hot water as our soup of the day."
End Sub
Private Sub chefsButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chefsButton.Click
' Display Chef's Special
Me.specialsTextLabel.Text = "Kirk's Diner is offering yesterday's leftovers as our premium chef's special today."
End Sub
Private Sub fishButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles fishButton.Click
' Display Daily Fish
Me.specialsTextLabel.Text = "Kirk's Diner is offering fillet of oscar as today's daily fish special."
End Sub
End Class
My solution’s build screenshot:

Press a button to get a diner special










