option boxes in games

I'm having difficulties with an option box on my Stat Menu. It has the user select from an option box a character they wish to look at, for instance in the equipment menu, but it always returns the First Character.

Here is part of the code:

For X = 1 To 2
If optCharacter(X).Value = True Then
CharNum = X
End If
Next X

Then in another form, I have this:

lblCharacterName = Character(CharNum)

CharNum is Global in a module, and is works becuase it displays a character's info, but only the first characters. Any help would be appreciated.

You For/Next loop is telling it to display only the first two characters. (At least, thats what it looks like to me.)