Mi primer programa con VB2008

[ElBarney-D]

Código [Seleccionar] Expandir

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





Lo eh puesto para ver si está bien, ya que a mi me funciona bien!

Saludos.

[seba123neo]

sencillo y al grano jeje,mira podes declarar las variables en una sola linea asi:

Código [Seleccionar] Expandir

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

eso en .NET lo podes hacer,en cambio en vb 6 no se puede declarar asi....

saludos.