Foro de elhacker.net

Module Module1

    Sub Main()
        Dim a As Decimal
        Dim b As Decimal
        Dim c As Decimal
        Dim d As Decimal
        Dim e As Decimal
        Dim f As Decimal
        Dim g As Decimal
        Dim h As Decimal
        Dim i As Decimal
        Dim j As Decimal
        Dim k As Decimal
        Dim l As Decimal
        Dim m As Decimal
        Console.WriteLine("Salario del mes de Enero: ")
        a = Console.ReadLine
        Console.WriteLine("Salario del mes de Febrero: ")
        b = Console.ReadLine
        Console.WriteLine("Salario del mes de Marzo: ")
        c = Console.ReadLine
        Console.WriteLine("Salario del mes de Abril: ")
        d = Console.ReadLine
        Console.WriteLine("Salario del mes de Mayo: ")
        e = Console.ReadLine
        Console.WriteLine("Salario del mes de Junio: ")
        f = Console.ReadLine
        Console.WriteLine("Salario del mes de Julio: ")
        g = Console.ReadLine
        Console.WriteLine("Salario del mes de Agosto: ")
        h = Console.ReadLine
        Console.WriteLine("Salario del mes de Septiembre: ")
        i = Console.ReadLine
        Console.WriteLine("Salario del mes de Octubre: ")
        j = Console.ReadLine
        Console.WriteLine("Salario del mes de Noviembre: ")
        k = Console.ReadLine
        Console.WriteLine("Salario del mes de Diciembre: ")
        l = Console.ReadLine
        m = a + b + c + d + e + f + g + h + i + j + k + l
        Console.WriteLine("Tu salario total en este año a sido de: {0}", m)
        Console.ReadLine()
    End Sub

End Module

 Dim a,b,c,d,e ... As Decimal