Module Module1 Sub Main() Dim Salary As Double Console.Write("Salary: ") Salary = Console.ReadLine() Console.WriteLine(Salary) End SubEnd Module Salary: 123123