Menu Items in the Main Menu [RESOLVED]

[Jared]

How can I write code to uncheck ALL of the checked menu items that are in a Main Menu?

Here is the code that I tried: (which doesn't work)

Private Sub MenuItem8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem8.Click
cpnum = 3
Dim i As Integer
Dim mnu As MainMenu = Me.MainMenu1
For i = 1 To 20
MainMenu1.MenuItems.Item(i).Checked = False
Next
MenuItem8.Checked = True
End Sub

Thanks,
Jared.