Imports System

​

Public Module Module1

​

    Public Sub Main()

        dim anynumber as Integer

        Console.WriteLine("How many donuts do you want?")

        anynumber = console.readline()

    End Sub

End Module

​