Función doble Aprende programación con ejercicios Visual Basic (VB.net)

Imports System
Public Class exercise104
    Public Shared Function Double(ByVal number As Integer) As Integer
        Return number * 2
    End Function

    Public Shared Sub Main()
        Console.Write("Enter a number: ")
        Dim number As Integer = Convert.ToInt32(Console.ReadLine())
        Console.WriteLine("Double of {0} is {1}", number, Double(number))
    End Sub
End Class