[mono-vb] working Inkey module

[Jude DaShiell]

Cut here:
' Module: Inkey - disrupts output; prompts for key to be hit, clears screen,
' then resumes output.
Module Inkey
Sub Inkey()
Dim Inputvar As String = ""
While(len(Inputvar)<1)
Console.WriteLine("Hit any key to continue-> ")
Try
Inputvar = Console.Read()
Catch ex As Exception
End Try
End While
'Console.Clear()
End Sub
End Module
Cut Here.