Mega Code Archive
Declare Double type variable and assign value
Module Module1
Sub Main()
Dim EmployeeName As String
Dim EmployeePhoneNumber As String
Dim EmployeeSalary As Double
Dim NumberOfEmployees As Integer
EmployeeName = "James Bond"
EmployeePhoneNumber = "555-1212"
EmployeeSalary = 45.0
NumberOfEmployees = 1
Console.WriteLine("Number of employees: " & NumberOfEmployees)
Console.WriteLine("Employee name: " & EmployeeName)
Console.WriteLine("Employee phone number: " & EmployeePhoneNumber)
Console.WriteLine("Employee salary: " & EmployeeSalary)
End Sub
End Module
Number of employees: 1
Employee name: James Bond
Employee phone number: 555-1212
Employee salary: 45