Contact: aviboots(AT)netvision.net.il
40,764 questions
53,140 answers
573 users
Imports System Public Module Module1 Public Sub Main() Dim celsius As Integer = 31 Dim fahrenheit As Double = ((9.0 / 5.0) * celsius) + 32 Console.WriteLine("Fahrenheit = " + CStr(fahrenheit)) End Sub End Module ' run: ' ' Fahrenheit = 87.8 '