VB2008EEのラジオボタンのチェック無し

質問

VB2008EEのラジオボタンのチェック無し

4つにチェックを入れてしまうと、全ての変数に値が入ってしまい、ボタンクリック時にチェックが
入っていないのを含めて、batファイル4つとも実行されてしまいます。
チェックボックスでも同じような記述をしていまして、下記の記述でチェックされていないものの値を変えられます。

If CheckBox1.CheckState = CheckState.Unchecked Then
　　aaa = "9"
End If

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

If (aaa = "1") Then
Shell("cmd /c xxx.bat", AppWinStyle.NormalFocus, True)
End If

If (bbb = "2") Then
Shell("cmd /c yyy.bat", AppWinStyle.NormalFocus, True)
End If

If (ccc = "3") Then
Shell("cmd /c zzz.bat", AppWinStyle.NormalFocus, True)
End If

If (ddd = "4") Then
Shell("cmd /c www.bat", AppWinStyle.NormalFocus, True)
End If

End Sub

Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
aaa = "1"
End Sub

Private Sub RadioButton2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton2.CheckedChanged
bbb = "2"
End Sub

Private Sub RadioButton3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton3.CheckedChanged
ccc = "3"
End Sub

Private Sub RadioButton4_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton4.CheckedChanged
ddd = "4"
End Sub

レベル低いといきなりラスボスは倒せないので、目先のミッションクリアが目的です。
応用は後々学んで行きます。
「ラジオボタンでチェックされていない所の変数を変える事は出来るでしょうか？」

回答No.1

pgware

いっぱい同じタイトルがあるから読ませてもらったけど・・・

というか他の人が載せた解答あるけど全部できるじゃん
実際コードも書いたけど動いたわ

一個前の板にrk_lesさんへの回答に「応用はできてないですが、間違ってはないです。」とかあるけど間違ってるから動かないんだろ？正しいのに動かないってこと？