Option Explicit On
Option Strict On
Module Module1
Sub Main()
Dim Name As String
Dim GrossString, emp_str, bon_str As String
Dim Gross, Deduct, Net, bon_num As Double
Dim emp_num As Integer
Const RATE As Double = 0.25
Const QUIT As String = “XXX”
Const REPORT_HEADING As String = “Payroll Report”
Const END_LINE As String = “**End of report”
‘Work done in the housekeeping() procedure
System.Console.WriteLine(REPORT_HEADING)
Name = InputBox$(“Enter employee’s name: “)
While (Name <> QUIT)
‘Work done in the detailLoop() procedure
emp_str = InputBox$(“Enter employee’s number: “)
emp_num = Convert.ToInt32(emp_str)
bon_str = InputBox$(“Enter your bonus: “)
bon_num = Convert.ToDouble(bon_str)
GrossString = InputBox$(“Enter employee’s gross pay: “)
Gross = Convert.ToDouble(GrossString)
Deduct = Gross * RATE
Net = Gross – Deduct + bon_num
System.Console.WriteLine(“Name: ” & Name)
System.Console.WriteLine(“Number: ” & emp_num)
System.Console.WriteLine(“Bonus: ” & bon_num)
System.Console.WriteLine(“Gross Pay: ” & Gross)
System.Console.WriteLine(“Deductions: ” & Deduct)
System.Console.WriteLine(“Net Pay: ” & Net)
Name = InputBox$(“Enter employee’s name: “)
End While
‘Work done in the endOfJob() procedure
System.Console.WriteLine(END_LINE)
End Sub
End Module
Which of the three basic structures (sequence structure, selection/decision structure, loop structure) does it contain by going through the various parts and determine the structures used? That is it. Thank you very much for your time.
Hi there! Click one of our representatives below and we will get back to you as soon as possible.