Imports System Module LoopStatements1 Sub main() Do While "Hello" Console.WriteLine("Hello World") Loop End Sub End Module