Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

Seabra

Preencher multiplos Combobox

Mensagens Recomendadas

Seabra

Olá

Necessito de preencher 20 comboboxs, Combobox1 a combobox20.

ComboBox1.Items.Add("Hora1")

ComboBox1.Items.Add("Hora2")

ComboBox1.Items.Add("Hora3")

ComboBox1.Items.Add("Hora4")

Há alguma forma de fazer isto sem repetir 20 vezes o codigo acima?

Cumprimentos

Seabra

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Tuntankamon

Podes fazer algo como isto...

  Dim lista() As String = {"1", "2", "3"}
        For Each ctrl As Control In Me.Controls
            If TypeOf ctrl Is ComboBox Then
                DirectCast(ctrl, ComboBox).Items.AddRange(lista)
            End If
        Next

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Seabra

O exemplo acima funciona na perfeição.

Neste contexto o que eu pretendo agora é dentro de um ciclo

For A=1 to (n)Comboboxs

Console.WriteLine(Combobox(a))

Next

utilizar o comboBox um a um. Ou seja seber qual o valor do combobox1, combobox2,... Isto é possível?

Cumprimentos

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites
Tuntankamon

A mesma lógica...

Dim cb As ComboBox
        For Each ctrl As Control In Me.Controls
            If TypeOf ctrl Is ComboBox Then
                cb = DirectCast(ctrl, ComboBox)
                'Se qeueres o selectedValue em cada uma
                Debug.WriteLine(cb.SelectedValue)
                'Se queres o item na posicao 0
                Debug.WriteLine(cb.Items(0).ToString)
                'Se queres correr todos os items
                For i As Integer = 0 To cb.Items.Count - 1
                    Debug.WriteLine(cb.Items(i).ToString)
                Next
            End If
        Next

Partilhar esta mensagem


Ligação para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora

×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade. Este site usa cookies para disponibilizar funcionalidades personalizadas. Para mais informações visite esta página.