Why dusn't this code Work?

[zmanalpha]

Sorry to hear you're having trouble, here is a corrected version of that.(Note there's probably a million other ways to do this.)

Code:

If CheckBox1.Checked = True Then
            MsgBox("Test", MsgBoxStyle.OkOnly, "Test")
        Else
            If MsgBox("test", MsgBoxStyle.OkCancel, "test") = MsgBoxResult.Cancel Then
                If MsgBox("Are You Sure?", MsgBoxStyle.YesNo, "Test") = MsgBoxResult.Yes Then
                    Me.Close()
                End If
            End If
        End If