VB: Programm mit "X" beenden

[ChrisDaHub]

Hallo,

kann mir jemand sagen, wie ich meinem VB-Programm begreiflich mache, dass das Programm beender werden soll, sobald ich oben rechts auf das "X" klicke?

Es scheint so, als würde der klick den Befehl "Me. Hide" ausführen.. Was ich aber möchte ist "END" Im Taskmanager bleibt das Prog immer noch offen...

Wie ändere ich das?

Danke für eure Hilfe,

Chris;-)

[Peregrin]

hi,

im fenster, welches geschlossen wird in dem ereignis form_unload die anweisung End aufrufen.

damit sollte das programm beendet sein...

hoffe, es hilft...

[-roTekuGeL-]

boah das hab ich auch...

ich habs auch schon so gemacht wie peregrin gemeint hat aber trotzdem bleibts als task geht nur zu wenn ichs per commandbutton und nem end zumache aber frag mich net warum

[ChrisDaHub]

Hmmm - das sieht aber für mich jetzt so aus, als würde das Programm bei jedem Mal, wenn ich das Form entlade, beendet werden... Das ist nicht gut..

Es soll wirklich nur dann beendet werden, wenn das Form mit dem "X" entladen wird...

Geht das?

Gruß,

Chris;-)

[Peregrin]

hi,

im unload-ereignis des formulars kann der 'verursacher' des ereignisses ermittelst werden (parameter unloadmode):

• vbFormControlMenu 0 The user chose the Close command from the Control menu on the form.
  
• vbFormCode 1 The Unload statement is invoked from code.

der erste fall waere dein fall, dass 'x' geklickt wurde...

durch setzen des parameters cancel auf -1 wird das formular nicht entladen

quelle: msdn

z. b.

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

    If (UnloadMode = vbFormControlMenu) Then

        End ' user hat 'x' geklickt

    End If

End Sub

hoffe, es hilft

[Racker]

Moin moin,

falls es Dir hilft: wenn Du ein Programm wirklich abschiessen willst über das standartmässige [x] sieht das in vb.net so aus:

Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing

    Application.Exit()

End Sub

Hoffe, dass Dir das hilft.

[g_nikolai]

hast du mehrer Formulare in deinem Projekt?? dann solltest du auch alle Formulare entladen.

mit

for each frm in Forms

frm.unload

next frm

[ChrisDaHub]

Hi,

dann wird mein Programm aber auch geschlossen, wenn ich noch andere Formulare offen habe...

Ich habe mehrere Formulare. Das Programm soll nur dann beendet werden, wenn nur noch ein Formular offen ist, und dieses geschlossen wird...

Gruß,

Chris;-)

[-roTekuGeL-]

ja dann frag doch ab ob deine anderen formulare .visible = true sind (d.h. sie sichtbar und damit offen sind) wenn kein anderes mehr sichtbar ist dann lässt du das programm beenden wenn nicht nur die eine form unsichtbar machen