radial buttons and printing to text

I was wondering what would be the easiest way to say that a button is selected, so print this to file. This was my original idea.

Select Case options
Case Option1 = True
'Print #filenum, "ZP";
Case Option2 = True
'Print #filenum, "XP";
Case Option3 = True
'Print #filenum, "YP";
Case Option4 = True
'Print #filenum, "YC";
Case Option5 = True
'Print #filenum, "XC";
Case Option6 = True
'Print #filenum, "ZC";

For some reason this doesn't seem to work. All I want to do is when one of the options is selected, print text to file. It seems so easy, but my VB noob brain isn't working too well today. I'd appreciate any help.

what is the options??It's a array of the option control??If u use the option1 control array,u should modify your code like it:
For i = 0 To Option1.count-1
if Option1(i)=true then
select case i
case 0
Print #filenum, "ZP";
case 1
'Print #filenum, "XP";
....

the option are the names of the radials that i have on my form

I recommend u to use my way to do it..It's a fast solution.