Contact: aviboots(AT)netvision.net.il
41,379 questions
53,922 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 '