Contact: aviboots(AT)netvision.net.il
43,874 questions
57,260 answers
573 users
Imports System Public Module Module1 Public Sub Main() Dim n As Integer = 3456 Dim d As Double = Convert.ToDouble(n) Console.WriteLine(d) End Sub End Module ' run: ' ' 3456 '