Código:
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.