If (Condition) Then - 3 kondisi Pada VB.NET 2005 Console Application

If (Condition) Then - 3 kondisi Pada VB.NET 2005 Console Application :

Imports system.Console
Module module1
    Sub main()
        Dim nama, ket, mk As String
        Dim nilai As Integer
        Write("Nama   : ")
        nama = ReadLine()
        Write("Mata Kuliah : ")
        mk = ReadLine()
        Write("Nilai  : ")
        nilai = ReadLine()

        If nilai >= 65 Then
            ket = "LULUS"
        ElseIf nilai >= 45 And nilai < 65 Then
            ket = "HER"
        Else
            ket = "MENGULANG"
        End If

        Write("keterangan  : Anda " & ket)

        ReadLine()
    End Sub
End Module