Como modificar os textos do RadioButtons de acordo o item do comboBox

[Luiz da Silva 0]

Como modificar os textos do RadioButtons de acordo o item do comboBox Selecionado?

 

Boa Tarde,

 

Este é o meu primeiro tópico e agradeceria muito se algme pudesse me dar essa força.

 

Eu quero modificar determinados radioButtons de acordo o item selecionado no ComboBox,

Mas não estou conseguindo isso.

 

Estou utilizando o Visual Basic 2010

 

'No Form1 está o seguinte código:

 

Bom dia,

 

Eu quero modificar determinados radioButtons de acordo o item selecionado no ComboBox,

Mas não estou conseguindo isso.

 

Estou tentando fazer com Select Case, mas está dando erro

 

 

Select Case ComboBox1.SelectedItem

Case 0

RadioButton1.Text = ("Hiper")

RadioButton2.Text = ("Super")

RadioButton3.Text = ("Mini")

RadioButton4.Text = ("Todo Dia")

 

Case 1

RadioButton1.Text = ("Extra")

RadioButton2.Text = ("Pão de Açucar")

RadioButton3.Text = ("Compre Bem")

RadioButton4.Visible = False

 

Case 2

RadioButton1.Text = ("Hiper")

RadioButton2.Text = ("Super")

RadioButton3.Text = ("Mini")

RadioButton4.Visible = False

 

Case 3

RadioButton1.Text = ("Loja grande")

RadioButton2.Text = ("Loja Média")

RadioButton3.Text = ("Loja Pequena")

RadioButton4.Visible = False

 

End Select

 

Exemplo:

 

Select Case ComboBox1.SelectedItem

Case 0

RadioButton1.Text = ("Hiper")

RadioButton2.Text = ("Super")

RadioButton3.Text = ("Mini")

RadioButton4.Text = ("Todo Dia")

 

Case 1

RadioButton1.Text = ("Extra")

RadioButton2.Text = ("Pão de Açucar")

RadioButton3.Text = ("Compre Bem")

RadioButton4.Visible = False

 

Case 2

RadioButton1.Text = ("Hiper")

RadioButton2.Text = ("Super")

RadioButton3.Text = ("Mini")

RadioButton4.Visible = False

 

Case 3

RadioButton1.Text = ("Loja grande")

RadioButton2.Text = ("Loja Média")

RadioButton3.Text = ("Loja Pequena")

RadioButton4.Visible = False

 

End Select

[KhaosDoctor 242]

Mude o SelectedItem do combobox para SelectedIndex

[Luiz da Silva 0]

Mude o SelectedItem do combobox para SelectedIndex

 

Agradeço Doctor,

 

ficou assim:

 

 

Solucionado Galera, Agradeço a todos.

 

Solução:

Public Class Form1

 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

ComboBox1.Items.Add(0, "Bom Preço / Wal Mart")

ComboBox1.Items.Add(1, "Grupo Pão de Açucar")

ComboBox1.Items.Add(2, "GBarbosa")

ComboBox1.Items.Add(3, "Armazém Mateus")

 

 

End Sub

 

 

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

Select Case ComboBox1.SelectedIndex

 

Case 0

RadioButton1.Text = ("Hiper")

RadioButton2.Text = ("Super")

RadioButton3.Text = ("Mini")

RadioButton4.Text = ("Todo Dia")

 

Case 1

RadioButton1.Text = ("Extra")

RadioButton2.Text = ("Pão de Açucar")

RadioButton3.Text = ("Compre Bem")

RadioButton4.Visible = False

 

Case 2

RadioButton1.Text = ("Hiper")

RadioButton2.Text = ("Super")

RadioButton3.Text = ("Mini")

RadioButton4.Visible = False

 

Case 3

RadioButton1.Text = ("Loja grande")

RadioButton2.Text = ("Loja Média")

RadioButton3.Text = ("Loja Pequena")

RadioButton4.Visible = False

 

End Select

End Sub

End Class