Answer to Question #300382 in Visual Basic for Vhenz

Question

Design and develop a program that will accept Name and Total Units enrolled 

to compute and display the tuition fees, miscellaneous fees and the total assessment of 

a student.

 To compute for Tuition Fees, multiply Total Units Enrolled and Payment per 

Unit which is set to 250.

 To compute for Miscellaneous Fees, add library fee, laboratory fee, 

accreditation fee, student welfare fund, institutional development fund, 

outreach and management fee which are set to 750.00, 1000.00, 250.00, 150.00, 

200.00, 100.00 and 500.00 respectively.

 To compute for the Total Assessment, add Tuition Fees and Miscellaneous 

Fees.

Answer 1

Imports System.IO


Module Module1
    Sub Main()
        Console.Write("Enter the name: ")
        Dim name As String = Console.ReadLine()
        Console.Write("Enter the total units enrolled: ")
        Dim units As Integer = Integer.Parse(Console.ReadLine())




        Dim tuitionFees As Double = units * 250
        'add library fee, laboratory fee, accreditation fee, student welfare fund, institutional development fund, 
        'outreach and management fee which are set to 750.00, 1000.00, 250.00, 150.00, 
        '200.00, 100.00 and 500.00 respectively.
        Dim miscellaneousFees As Double = 750.0 + 1000.0 + 250.0 + 150.0 + 200.0 + 100.0 + 500.0
        Dim totalAssessment As Double = tuitionFees + miscellaneousFees


        Console.WriteLine("The tuition fees of a student: " + tuitionFees.ToString())
        Console.WriteLine("The miscellaneous fees of a student: " + miscellaneousFees.ToString())
        Console.WriteLine("The total assessment of a student: " + totalAssessment.ToString())


        
        Console.ReadLine()
    End Sub
End Module