Imports System

'EJEMPLO CICLO IF 

'CONDICION SI 

'PROGRAMA QUE EVALUE SI UN NUMERO INGRESADO ES POSITIVO O NEGATIVO 

'REALIZADO POR: Gladys Juárez

Public Module Module1

    Public Sub Main()

        'DECLARACION DE VARIABLES 

        DIM NÚMERO AS INTEGER 

        'INGRESO - ENTRADAS

        Console.WriteLine("INGRESA UN NUMERO: ")

        NÚMERO = CONSOLE.ReadLine()

        'PROCESOS Y SINTAXIS IF

        IF NÚMERO >0 THEN

            'PROCESOS SI LA CONDICION ES VERDADERA 

            CONSOLE.WriteLine("EL NÚMERO ES POSITIVO")

        ELSE

            'PROCESOS SI LA CONDICION ES FALSA

            CONSOLE.WriteLine("EL NÚMERO ES NEGATIVO")

        END IF 

        IF NÚMERO = 0 THEN 

            CONSOLE.WriteLine("EL NÚMERO ES 0")

        END IF 

    End Sub

End Module