Question

How to convert kilometres to miles in VB.NET

Answer 1

Imports System

Public Class Program
    Public Shared Function KilometersToMiles(ByVal miles As Double) As Double
        Return miles * 0.621371192
    End Function

	Public Shared Sub Main()
        Dim kilometers As Double = 100
		
        Dim miles As Double = KilometersToMiles(kilometers)
		
        Console.WriteLine("{0} km = {1} miles", kilometers, miles)
    End Sub
End Class



' run:
'
' 100 km = 62.1371192 miles
'

 

70+ SQL courses for beginners and professionals