Build a visual basic program based on the following program requirements: Applic
ID: 650964 • Letter: B
Question
Build a visual basic program based on the following program requirements:
Application title: Bowling Scoreboard
This Windows application will calculate the score of each frame during a bowling game for one person. The user enters the score of each frame to display the total on the scoreboard after 10 frames of bowling. From a window on the screen,
The user clicks the Enter Each Frame button in an InputBox object to enter a score after each frame in a game
The score for each frame and the running total is displayed in a ListBox
After the user clicks the Cancel button in the InputBox object to end the game scoring, the total final score is displayed.
A File menu contains a Clear and an Exit option. The Clear menu item clears the result and the frame scores. The Exit menu item closes the application.
Nonnumeric values should not be accepted.
A negative value should not be accepted.
Explanation / Answer
Private Sub EnterEachFrame_Click(sender As Object, e As EventArgs) Handles EnterEachFrame.Click
Dim Frame(10) as Integer
Dim values As Integer
Private sub addval()
For num 1 To 10
Frame(value)= InputBox("Enter the score value")
List1.AddItem Frame(Value)
Next
End Sub
End sub
------------------------------------------------------------------------------------------------------------------------------------------------------------
Private sub start_click
addval
End Sub
--------------------------------------------------------------------------------------------------------------------------------------
Private Sub Cancel_Click(sender As Object, e As EventArgs) Handles Cancel.Click
Dim Totalscore as integer=0
dim num as integer
For num= 1 to (Frame.Length -1)
Totalscore+ = Frame(num)
Next num
End sub
----------------------------------------------------------------------------------------------
Private Sub Exit_Click(sender As Object, e As EventArgs) Handles Exit.Click
Exit()
End sub
----------------------------------------------------------------------------------------------------------------------------------------
Private Sub Clear_Click(sender As Object, e As EventArgs) Handles Clear.Click
Dim Frame(10) as Integer
Erase Frame
End sub
Related Questions
drjack9650@gmail.com
Navigate
Integrity-first tutoring: explanations and feedback only — we do not complete graded work. Learn more.