Private Sub frmAvvio_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        Dim A As MsgBoxResult
        A = MsgBox("Uscire da EasY Net?", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "EasY Net")
        Select Case A
            Case MsgBoxResult.Yes
                Me.Close()
            Case MsgBoxResult.No
                Exit Sub
        End Select
    End Sub