combobox do vb

[Guest Dilnan Cedraz]

oi pessoal estou com uma duvida...se eu carrego um combo box...e quero...ao mudar o valor do combo box, este item apareça em uma text1.text..como faço isso?

Private Sub cmb1_Change()

text1.text = ??????

End Sub

Private Sub Form_Load()

Dim i As Integer

For i = 1 To 10

cmb1.AddItem CStr(i)

Next i

End Sub

[Dilvan Cedraz]

Obrigado pela atenção...mas descobri que a ação não é feita no change...e sim no evento click do combo box

[ƒ Edu ƒ]

Obrigado pela atenção...mas descobri que a ação não é feita no change...e sim no evento click do combo box

Não entendi... Você já solucionou a dúvida?

Bom se ainda tiver com essa dúvida, faz assim:

Private Sub Combo1_Click()

Text1.Text = Combo1.Text

End Sub

Toda vez que você clicar em um item da lista no combo, ele vai jogar para o txtbox.

Abraço.