VB DemoIfSatuKondisi2

 Module DemoIfSatuKondisi2

    'Buka DemoIfSatuKondisi2.vbproj

    Sub Main()

        Dim nilaiUAS As Integer

        nilaiUAS = InputBox("Masuk nilai UAS: ")

        Debug.Print("Nilai UAS: " & nilaiUAS)

        If (nilaiUAS >= 50) Then

            Debug.Print("Lulus UAS")

        End If

    End Sub

End Module