sub Main as Startup

[tlynch]

How do I use sub Main as a startup? The following of course exitst
immediately. A loop would just eat up processor cycles. If I use
ShowDialog(), application exits as soon as the second form is launched by
the first form. (Many forms many instances of each form.) What is the proper
way?

main.vb
Module startup
Public Sub Main()
' Initialize Globals

[steve]

application.run(new frmmain)

hth,

steve

"tlynch" <tl****@accesstoledo.com> wrote in message
news:vp************@corp.supernews.com...

How do I use sub Main as a startup? The following of course exitst
immediately. A loop would just eat up processor cycles. If I use
ShowDialog(), application exits as soon as the second form is launched by
the first form. (Many forms many instances of each form.) What is the proper way?

main.vb
Module startup
Public Sub Main()
' Initialize Globals
.

Dim mfrmMain As New frmMain
mfrmMain.Show()
End Sub
End Module

Thanks

[William Ryan]

In addition to what Steve said, make sure you specify Sub Main as the start
up object in your Assembly properties dialog.
"tlynch" <tl****@accesstoledo.com> wrote in message
news:vp************@corp.supernews.com...

How do I use sub Main as a startup? The following of course exitst
immediately. A loop would just eat up processor cycles. If I use
ShowDialog(), application exits as soon as the second form is launched by
the first form. (Many forms many instances of each form.) What is the proper way?

main.vb
Module startup
Public Sub Main()
' Initialize Globals
.

Dim mfrmMain As New frmMain
mfrmMain.Show()
End Sub
End Module

Thanks

[Herfried K. Wagner [MVP]]

* "tlynch" <tl****@accesstoledo.com> scripsit:

How do I use sub Main as a startup? The following of course exitst
immediately. A loop would just eat up processor cycles. If I use
ShowDialog(), application exits as soon as the second form is launched by
the first form. (Many forms many instances of each form.) What is the proper
way?

main.vb
Module startup
Public Sub Main()
' Initialize Globals
.

Dim mfrmMain As New frmMain
mfrmMain.Show()
Replace the lines above with:

\\\
Application.Run(New frmMain())
///
End Sub
End Module

--
Herfried K. Wagner
MVP · VB Classic, VB.NET
<http://www.mvps.org/dotnet>