Imports System

​

Public Module Module1

​

    'program to determine if student total average marks is Pass or Fail

    Public Sub Main()

        Console.WriteLine("What is your grade?")

        Dim M1 as Integer

        Console.WriteLine("Enter M1 marks")

        M1 = Console.ReadLine()

        Dim M2 as Integer

        Console.WriteLine("Enter M2 marks")

        M2 = console.ReadLine()

        Dim M3 as Integer

        M3 = console.WriteLine("Enter M3 marks")

        Dim M4 as Integer 

        M4 = console.WriteLine("Enter M4 marks")

        If M1 then

          End Sub

End Module

​