Код обработчика радиокнопок VB.NET запускается дважды

Question

У меня есть группа RadioButtons в VB.NET.Я хотел бы создать одну функцию, которая будет обрабатывать их все вместе.Мой код ниже.

    Private Sub employmentStatusChanged(ByVal sender As System.Object,_
          ByVal e As System.EventArgs) Handles rbtnEmployed.CheckedChanged, _ 
          rbtnUnemp.CheckedChanged, rbtnStudent.CheckedChanged, rbtnRetired.CheckedChanged
    If rbtnEmployed.Checked Then 
        Dim employ As New Employer
        employ.ShowDialog()
    ElseIf rbtnStudent.Checked Then
        Dim stud As New Students
        stud.ShowDialog()
    ElseIf rbtnRetired.Checked Then
        Dim employ As New Employer
        employ.ShowDialog()
    End If
End Sub

Эта функция работает нормально при первом нажатии кнопки.Проблема возникает, когда я нажимаю на другую кнопку.Он срабатывает один раз для измененного состояния первой кнопки (от проверенного до непроверенного), а затем снова для второй кнопки (от непроверенного до проверенного).

Есть идеи о том, как этого избежать?Заранее спасибо!

Answer 1

Вы не можете.Тем не менее, отправитель является переключателем, который был нажат.Просто проверьте состояние этого.Если sender.Checked - False, вернитесь из обработчика события.