Problema con variable de configuracion (chorrada, creo)

[AlterElt]

Buenas!

A ver tengo un problemilla que me esta volviendo loco xD

El caso es que tengo la siguiente subrutina:

Código vb:

Private Sub MPT_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing
        If CierroPorCheckFail = False Then
            Dim respuesta As Integer
 
            respuesta = MsgBox("¿Seguro que quieres salir?", MsgBoxStyle.YesNo, "Salir")
 
            'si la respuesta es no (respuesta=7)
            If respuesta = 7 Then
                'cancelo el salir
                e.Cancel = True
            Else
                'End
                Me.Close()
            End If
        End If
    End Sub
 

Bien, pues si la dejo tal cual esta, sorprendentemente no funciona, cuando antes funcionaba bien y cerraba la ventana al darle a SI y volvia al programa al darle a NO.

Bueno, pues ahora tal cual está si le doy al si me aparece otra vez el MSGbox preguntandome si quiero salir. Debugando he visto que respuesta coge el valor correcto.

La otra historia es que con el END me funciona todo bien, pero no me guarda una variable de configuración en la que guardo si el estado del archivo esta "abierto" o "cerrado" y por lo tanto al abrir de nuevo la aplicación no pregunta si quieres volver a abrir automaticamente el archivo que no se cerró en la anterior sesión.

Es como si el Me.Close cerrara el messageBox o algo asi, la verdad es que me parece un comportamiento muy raro, tanto que no me guarde la variable de configuración al salir con End, como que me repita el msgbox al confirmar que quiero salir... raro raro

A ver si alguien me puede dar una solución.

Saludos

[AlterElt]

Por lo que veo a veces graba la variable de cofiguración y otras veces no xD

En fin, me parece a mi que es del windows que se esta volviendo loco con el archivo de configuracion que tiene que cargar o algo xD

En fin, voy a probar con una maquina virtual...

Saludos

[Geovanny0401]

amigo prueba con este codigo y me dices como te fue. espero q te sirva

try
If MessageBox.Show("¿Desea Salir?", "Sistema", MessageBoxButtons.YesNo, MessageBoxIcon.Warning) = Windows.Forms.DialogResult.No Then
e.Cancel = True
Else
End
End If
Catch ex As Exception
End Try