VB .close Anweisung Funktioniert nicht

[mashine-obf]

Hallo Irgendwie komme ich mal wieder mit den Instanzen nicht klar
kann mir jemand bitte bitte weiter helfen oder auf den Fehler hinweisen

   Public f2 As Form2 = New Form2() 
 	Public f2OutputLFN As String
 	Public f2Inputlfn As String
 
 
 	''''Menuitem15 = Displaybutton offnet form 2-5(if checked)
 	Private Sub MenuItem15_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles MenuItem15.Click
 			Dim f2 As Form2 = New Form2() 
 			f2.outputlfn = f2OutputLFN
 			f2.Inputlfn = f2Inputlfn
 
 			If MenuItem9.Checked Then
 				f2.Show()
 			End If
    End Sub
 
 
 
 	''''Menuitem16=close_Button fragt mit messagebox ab ob nochmal methode save aufgerufen werden soll oder without saving
 	Private Sub MenuItem16_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles MenuItem16.Click
 
 
 			If MessageBox.Show("Do you want to exit without saveing?", "Quit", _
 			 MessageBoxButtons.YesNo, MessageBoxIcon.Question) _
 			 = DialogResult.Yes Then
 
 				f2.Close()
 				  Else
 				Save()
 				Me.Close()
 	End Sub
 
 
 end Class

Vielen Dank
MFG Marco

 

[MFC openGL]

Kenne mich zwar in VB nicht gut aus, aber wenn du oben

"If MenuItem9.Checked Then
f2.Show()
End If"

schreibst, aber unten das End If nicht machst, könnte es daran liegen

Gruss

MFC OpenGL

 

[mashine-obf]

in vb ist
end if ==end
aber trotzdem vielen Dank