USE APP VISUAL STUDIO
Create an application to help the accountant make a billing statement showing the
customer's name, address, number of participants, training fee,
registration fee and total amount due.
P3,000 for training fee
P250 per person for registration fee
Module Module1
Sub Main()
Dim participantNames(10) As String
Dim participantAddresses(10) As String
Dim participantAmountDues(10) As Double
Dim totalAmountDue As Double = 0
Console.Write("Enter the number of participants: ")
Dim np As Integer = Integer.Parse(Console.ReadLine())
For i As Integer = 0 To np - 1
Console.Write("Enter customer's name: ")
participantNames(i) = Console.ReadLine()
Console.Write("Enter customer's address: ")
participantAddresses(i) = Console.ReadLine()
participantAmountDues(i) = 3000 + 250
Console.WriteLine()
Next
Console.WriteLine()
For i As Integer = 0 To np - 1
Console.WriteLine("Customer's name: " + participantNames(i))
Console.WriteLine("Customer's address: " + participantAddresses(i))
Console.WriteLine("Customer's training fee: P1500")
Console.WriteLine("Customer's registration fee: P120")
Console.WriteLine("Customer's total amount due: P" + participantAmountDues(i).ToString("N2"))
totalAmountDue += participantAmountDues(i)
Console.WriteLine()
Next
Console.WriteLine("The total number of participants: " + np.ToString())
Console.WriteLine("The total amount due: P" + totalAmountDue.ToString("N2"))
Console.ReadLine()
End Sub
End Module
Comments
Leave a comment