Opening Forms.

[Shawn]

I have an application that starts with a Module (Sub Main) that calls a few forms in order. When I close the next to last form, the last form is called and closes immediately. I have application.run (me) in the load event for that form and it opens fine if I call it at the beginning of the module. Here is the module code....

Module mdlLogon
Sub main()
Dim OpenFrmDbConnec t As New FrmDBConnect()
OpenFrmDbConnec t.Show()

If Form1.ds = Nothing Then
Dim Result As DialogResult
Result = MessageBox.Show ("You must setup the database connections, Click Ok to do so or Cancel to quit the program.", "Initial Setup",
MessageBoxButto ns.OKCancel, _MessageBoxIcon .Exclamation, MessageBoxDefau ltButton.Button 1, MessageBoxOptio ns.ServiceNotif ication)

If Result = DialogResult.OK Then
Dim OpenFrmSetup As New FrmSetup()
OpenFrmSetup.Sh ow()

ElseIf Result = DialogResult.Ca ncel Then
Exit Sub
End If
End If

Dim OpenFrmLogon As New FrmLogon()
OpenFrmLogon.Sh ow()

' This is the call that dies below..

Dim OpenForm1 As New Form1()
OpenForm1.Show( )

End Sub
End Module

This is driving me crazy!! Please someone help!!!!

[Herfried K. Wagner [MVP]]

"Shawn" <sh**********@c cci.org> schrieb:

I have an application that starts with a Module (Sub Main) that calls a few
forms in order. When I close the next to last form, the last form is called
and closes immediately.

\\\
Public Module Program
Public Sub Main()
Dim f As New Form1()
f.Show()
Application.Run ()
End Sub
End Module
///

In the project properties, select 'Sub Main' as startup object. Place the
code below in a button's 'Click' event handler:

\\\
Dim f2 As New Form2()
f2.Show()
Me.Close()
///

You can exit the application by calling 'Application.Ex itThread'. Take a
look at the 'ApplicationCon text' class too.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

[Shawn]

This pretty much looks like what I already have... Am I missing something?

"Herfried K. Wagner [MVP]" <hi************ ***@gmx.at> wrote in message
news:O%******** ********@TK2MSF TNGP09.phx.gbl. ..

"Shawn" <sh**********@c cci.org> schrieb:

I have an application that starts with a Module (Sub Main) that calls a fewforms in order. When I close the next to last form, the last form is calledand closes immediately.

\\\
Public Module Program
Public Sub Main()
Dim f As New Form1()
f.Show()
Application.Run ()
End Sub
End Module
///

In the project properties, select 'Sub Main' as startup object. Place the
code below in a button's 'Click' event handler:

\\\
Dim f2 As New Form2()
f2.Show()
Me.Close()
///

You can exit the application by calling 'Application.Ex itThread'. Take a
look at the 'ApplicationCon text' class too.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

[Herfried K. Wagner [MVP]]

"Shawn" <sh**********@c cci.org> schrieb:

This pretty much looks like what I already have... Am I missing something?

Maybe the reason that your code doesn't work is that you are calling
'Application.Ru n' in the form's 'Load' event handler -- which will already
require a message pump.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

[Stephany Young]

Yes.

As Herfried indicated, you should have the Application.Run in the Sub Main,
not in the Load event handler of a form.

It might seem that the difference is 'being picky', but the difference is
VERY important.
"Shawn" <sh**********@c cci.org> wrote in message
news:%2******** ********@TK2MSF TNGP12.phx.gbl. ..

This pretty much looks like what I already have... Am I missing something?

"Herfried K. Wagner [MVP]" <hi************ ***@gmx.at> wrote in message
news:O%******** ********@TK2MSF TNGP09.phx.gbl. ..

"Shawn" <sh**********@c cci.org> schrieb:

>I have an application that starts with a Module (Sub Main) that calls a few >forms in order. When I close the next to last form, the last form is called >and closes immediately.

\\\
Public Module Program
Public Sub Main()
Dim f As New Form1()
f.Show()
Application.Run ()
End Sub
End Module
///

In the project properties, select 'Sub Main' as startup object. Place
the
code below in a button's 'Click' event handler:

\\\
Dim f2 As New Form2()
f2.Show()
Me.Close()
///

You can exit the application by calling 'Application.Ex itThread'. Take a
look at the 'ApplicationCon text' class too.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

[Shawn]

Well, I made the changes and it still works that same. I like having the
application.run code in the module, so thanks, but it still does not keep
Form1 open. I even tried creating a new blank form just to see if there was
some code in form1 I was not seeing, but the same thing happens.

Also, if I replace the call to form1 with a second call to FrmLogon, it
calls it twice, but nothing else seems to start in that last position...

"Stephany Young" <noone@localhos t> wrote in message
news:ew******** ******@TK2MSFTN GP14.phx.gbl...

Yes.

As Herfried indicated, you should have the Application.Run in the Sub Main, not in the Load event handler of a form.

It might seem that the difference is 'being picky', but the difference is
VERY important.
"Shawn" <sh**********@c cci.org> wrote in message
news:%2******** ********@TK2MSF TNGP12.phx.gbl. ..

This pretty much looks like what I already have... Am I missing something?
"Herfried K. Wagner [MVP]" <hi************ ***@gmx.at> wrote in message
news:O%******** ********@TK2MSF TNGP09.phx.gbl. ..

"Shawn" <sh**********@c cci.org> schrieb:
>I have an application that starts with a Module (Sub Main) that calls a

few

>forms in order. When I close the next to last form, the last form is

called

>and closes immediately.

\\\
Public Module Program
Public Sub Main()
Dim f As New Form1()
f.Show()
Application.Run ()
End Sub
End Module
///

In the project properties, select 'Sub Main' as startup object. Place
the
code below in a button's 'Click' event handler:

\\\
Dim f2 As New Form2()
f2.Show()
Me.Close()
///

You can exit the application by calling 'Application.Ex itThread'. Take

a look at the 'ApplicationCon text' class too.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

[Cor Ligthert]

Shawn,

I never use an application start or a sub main in VBNet form program

A login form is typical a modal form in the load event of a main form. When
you do this in pseudo than

dim frm as New myloginform
(Here you can use the dialogOK if, i don't do it now)
frm.showdialog
if frm.pw not is correct then
me.close 'or whatever
end if
frm.dispose

When the password is not correct than will the login form the only one that
was showed, because the form is showed after the formload.

I hope this helps,

Cor

[Herfried K. Wagner [MVP]]

Cor,

"Cor Ligthert" <no************ @planet.nl> schrieb:

A login form is typical a modal form in the load event of a main form.
When you do this in pseudo than

dim frm as New myloginform
(Here you can use the dialogOK if, i don't do it now)
frm.showdialog
if frm.pw not is correct then
me.close 'or whatever
end if
frm.dispose

When the password is not correct than will the login form the only one
that was showed, because the form is showed after the formload.

Mhm... Why should the main form be loaded if there is no guarantee that it
will be shown at all? If the login form is shown, why is it shown modally
if there are no other forms open?

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

[Cor Ligthert]

Herfried

Mhm... Why should the main form be loaded if there is no guarantee that
it will be shown at all? If the login form is shown, why is it shown
modally if there are no other forms open?

Probably it is not even loaded.
This are the first instructions.

However why not?

And even when it takes time, when it is an unauthorised action than it will
even stop the ones when it takes time.

(And authorised it cost nothing more).

However why not?

Cor

[Shawn]

Well, I have the Sub Main Module doing a few different things. The program
will support online and offline modes so that different forms will be
started if the database can not be contacted. So, during the module startup,
I run a form that displays a staus bar and that form opens a new thread that
tests the ability to connect to the database. It then sets a variable that
tells the program which mode it is in.

What really has me confused is the fact that I can call the login box form
several times at the end of the module and it will stay open each time, but
anything else will close.

I thought about starting the Form1 and setting the opacity to 0 while the
login for runs, but it is a bit sloppy to me.

"Cor Ligthert" <no************ @planet.nl> wrote in message
news:uq******** ******@TK2MSFTN GP15.phx.gbl...

Herfried

Mhm... Why should the main form be loaded if there is no guarantee that
it will be shown at all? If the login form is shown, why is it shown
modally if there are no other forms open?

Probably it is not even loaded.
This are the first instructions.

However why not?

And even when it takes time, when it is an unauthorised action than it

will even stop the ones when it takes time.

(And authorised it cost nothing more).

However why not?

Cor