Startformular konnte nicht nach dem Laden Vb

Question

Ich erstelle Form, die Passwort in Textfeld erhalten dann nach dem Passwort richtig eingeben, lädt das Hauptformular. so ich benutze diese Methode in Passwort Form:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    If txtpass.Text = "sarina" Then 
     MsgBox("Correct", vbOKOnly + vbInformation, "Pass Correct") 
     Form1.Show() 
    Else 
     MsgBox("Incorrect", vbOKOnly + vbCritical, "Pass Incorrect") 
    End If 

End Sub 

nun nach dem Passwort korrekt eingegeben haben, möchte ich mit diesem Code Passwort Formular schließen:

startup.close() 

i diesen Code in Load-Ereignis setzen in Hauptformular . aber das Problem ist, dass, wenn ich Programm debugge, nachdem ich richtiges Passwort eingegeben habe, schließen beide Formen. Wie kann ich das machen ? Ich meine, nach Eingabe des richtigen Passwortes wird das Passwort geschlossen und dann das Hauptformular geladen. Wie ?

Answer 1

müssen Sie das übergeordnete Formular verbergen und die enge es nach dem Kind Form beendet ist

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    If txtpass.Text = "sarina" Then 
     MsgBox("Correct", vbOKOnly + vbInformation, "Pass Correct") 
     Me.Hide '<--| hide your currently open form 
     Form1.Show() '<--| load and show new form 
     Unload Form1 '<--| unload new form 
    Else 
     MsgBox("Incorrect", vbOKOnly + vbCritical, "Pass Incorrect") 
    End If 
End Sub 

Answer 2

Die andere Option ist, dass der Shutdown-Modus eines neuen Projekts ist standardmäßig „Als Startformular schließt“. Da Sie das Startformular geschlossen haben, beenden Sie das Programm. Sie können das auf "Wenn letzte Formular schließt" ändern.

Sie finden dies in der Menüleiste unter Projekt> Eigenschaften. Schauen Sie in der Nähe des unteren Rands des Anwendungsbereichs nach.