Imports System
Public Module Module1
Public Sub Main()
Console.WriteLine("Hello World")
End Sub
Sub INCTOCkm
Dim number as integer
Console.writeline("Please enter a number")
number = console.readline()
number * 2.54
Console.writeline("Your number is" & number)
end sub
End Module