[m8hee]

Hi,
I am trying to teach myself VB6. The problem I have is regarding control arrays and option buttons. I have one form with an array of option buttons (1 to 10) on it and another form with a label on it that I would like to fill with the caption from the selected option button. Does anyone know how I would do this?

Thanks

[Sideshow_Bob]

I recently switched to VB 2005 and it got rid of control arrays. It also lets you do things so much easier, so I may not be too helpful.

Try finding a method for the option control array named something along the lines of "Changed" or "SelectionChanged". Then in this method try something like this:

<name of form with label>.<label name>.Text = <control array name>.Selected.Text

[m8hee]

Thanks bob,
What I have tried is this:
dim loopvar as integer
dim room as string

lblroom.caption = ""
for loopvar = 0 to 9
If frmmain.option1(loopvar).value = 1 then
frmmain.option1.caption = room
lblroom.caption = room

end if

I don't get any errors but the lblroom.caption remains blank.

next loopvar

[asbo]

This is actually MUCH less difficult than you're trying to make it.

For this, I created two forms (Form1, Form2); ten OptionButtions in Form1 [Option1(0) to Option1(9)]; one Label in Form2 (Label1). Here's all my code, just paste it into Form1:

Private Sub Form_Load()
    Form2.Show
End Sub

Private Sub Option1_Click(Index As Integer)
    Form2.Label1 = Index
End Sub

In this demo, Form2.Label1 simple displays the index of which OptionButton is selected; in your case, you need to change that line to:

    Form2.Label1 = Option1(Index).Caption

and you're all set.

If you have any further questions, lemme know


asbo