tres Combobox no vb6

[Flecha]

Ola,

preciso saber como faço e se é possível 3 combobox da seguinte forma

Combo1

Cargo

Local

Combo2

Auxiliar

Carregador

Contador

São Bernardo

Diadema

Juquitiba

Combo3

Shopping

Bar

Farmácia

Armazem

Quando na combo1 for escolhido LOCAL, na combo2 só mostra São Bernardo, Diadema e Juquitiba

Quando na combo1 for escolhido CARGO, na combo 2 só abre Auxiliar, Carregador, Contador.

Quando na combo2 for escolhido DIADEMA, na combo 3 só aparece Farmácia e Armazem.

Acho que é isso ai.

Flecha

[Macêdo]

Private Sub Combo1_Click()

If Combo1.ListIndex = 0 Then
Combo2.Clear
Combo2.AddItem "São Bernardo"
Combo2.AddItem "Diadema"
Combo2.AddItem "Juquitiba"
ElseIf Combo1.ListIndex = 1 Then
Combo2.Clear
Combo2.AddItem "Auxiliar"
Combo2.AddItem "Carregador"
Combo2.AddItem "Contador"
Else
Combo2.Clear
End If

End Sub

Private Sub Combo2_Click()

If Combo2.Text = "Diadema" Then
Combo3.Clear
Combo3.AddItem "Farmácia"
Combo3.AddItem "Armazem"
Else
Combo3.Clear
Combo3.AddItem "Shopping"
Combo3.AddItem "Bar"
Combo3.AddItem "Farmácia"
Combo3.AddItem "Armazem"
End If

End Sub

Private Sub Form_Load()

Combo1.Clear
Combo2.Clear
Combo3.Clear

Combo1.AddItem "cargo"
Combo1.AddItem "local"

End Sub

[Flecha]

Macêdo,

Valeu funcionou e já inclui no projeto.

Flecha

Editado Maio 4, 2009 por Flecha