ATRIBUINDO VALORES DE UM ARRAY EM COMBOBOX

GUSTAVOREIS 31/10/2012 18:24:30
#413306
Pessoal, boa tarde!!
Gostaria de saber como eu faço para atribuir os valores de um array em combobox.

Exemplo:

Dim cmb_ICVM(1 To 10) As String

cmb_ICVM(1) = Frm_RelatoriO.Cmb_ICVM1
cmb_ICVM(2) = Frm_RelatoriO.Cmb_ICVM2
cmb_ICVM(3) = Frm_RelatoriO.Cmb_ICVM3
cmb_ICVM(4) = Frm_RelatoriO.Cmb_ICVM4
cmb_ICVM(5) = Frm_RelatoriO.Cmb_ICVM5
cmb_ICVM(6) = Frm_RelatoriO.Cmb_ICVM6
cmb_ICVM(7) = Frm_RelatoriO.Cmb_ICVM7
cmb_ICVM(8) = Frm_RelatoriO.Cmb_ICVM8
cmb_ICVM(9) = Frm_RelatoriO.Cmb_ICVM9
cmb_ICVM(10) = Frm_RelatoriO.Cmb_ICVM10

For i = 1 To 10
If cmb_ICVM(i) = [Ô][Ô] Then
cmb_ICVM(i) = LstICVM.SelectedItem.SubItems(2)
End If
Next


O [Ô] LstICVM.SelectedItem.SubItems(2)[Ô] é somente uma exemplo onde eu pego a linha que o usuário clicou e para atribuir no combo, mas não da certo, alguém pode me ajudar ?

Desde já agradeço!
MARCELO.TREZE 31/10/2012 20:25:11
#413315 Resposta escolhida
não entendi você falou de array, de combo, mas o que este listview tem haver com a situação?
GUSTAVOREIS 31/10/2012 20:35:07
#413316
Vou simplificar minha situação.

[ô]crio um array com os combos, certo ? Me corrija se eu estiver erro, por favor.
Dim cmb_ICVM(1 To 10) As String


Depois atribuo cada elemento do array igual cada combo que eu tenho no formulário, certo ? Me corrija se eu estiver erro, por favor.

cmb_ICVM(1) = Frm_RelatoriO.Cmb_ICVM1
cmb_ICVM(2) = Frm_RelatoriO.Cmb_ICVM2
cmb_ICVM(3) = Frm_RelatoriO.Cmb_ICVM3
cmb_ICVM(4) = Frm_RelatoriO.Cmb_ICVM4
cmb_ICVM(5) = Frm_RelatoriO.Cmb_ICVM5
cmb_ICVM(6) = Frm_RelatoriO.Cmb_ICVM6
cmb_ICVM(7) = Frm_RelatoriO.Cmb_ICVM7
cmb_ICVM(8) = Frm_RelatoriO.Cmb_ICVM8
cmb_ICVM(9) = Frm_RelatoriO.Cmb_ICVM9
cmb_ICVM(10) = Frm_RelatoriO.Cmb_ICVM10

Agora vem a questão:

Vamos supor que eu coloque a seguinte linha de código.

cmb_ICVM(1)= 22

Me corrija se eu estiver errado, mas não teria que aparecer o número 22 no combobox ?
Considerando que coloquei isso (cmb_ICVM(1) = Frm_RelatoriO.Cmb_ICVM1) na primeira linha do código ?

Por fim, eu gostaria de saber como que eu faço para atribuir um valor que esta em um array em um combobox ?
MARCELO.TREZE 31/10/2012 21:23:29
#413318
Não teria que aparecer no combo, isso porque o combo não está recebendo um valor e sim o array, ou seja

cmb_ICVM(1) = Frm_RelatoriO.Cmb_ICVM1[ô] recebe o valor do combo
Frm_RelatoriO.Cmb_ICVM1.Text = cmb_ICVM(1) [ô] recebe o valor do array


porem se eu fizer assim

cmb_ICVM(1) = 22
Frm_RelatoriO.Cmb_ICVM1.Text = cmb_ICVM(1) [ô] recebe o valor do array ou seja o 22


ou até mesmo adicionar este valor no combo assim

Frm_RelatoriO.Cmb_ICVM1.AddItem cmb_ICVM(1)


entendeu mais ou menos onde está errando?
FILMAN 31/10/2012 21:33:44
#413319
Cara eu não entendi muito bem o que queres dizer mais verifica se isso aqui te ajuda a esclarecer
FILMAN 03/01/2013 12:37:43
#416679
Se sua pergunta obteve exito favor encerrar o tópico


Obrigado
Tópico encerrado , respostas não são mais permitidas
Voltar