MAIN.BAS
Attribute VB_Name = "entry"
Sub main()
End Sub