RosettaCodeData/Task/Hello-world-Graphical/Visual-Basic/hello-world-graphical.vb

Sub Main()
    MsgBox "Goodbye, World!"
End Sub