Example of Functions without receive parameters in Visual Basic.NET