none
Combobox anos RRS feed

  • Pergunta

  • Olá pessoal, estou precisando de uma ajuda, estou criando um formulário de cadastro e preciso criar uma combobox com os anos para que a pessoa selecione o ano em que nasceu, queria fazer com que o combobox fosse preenchido com anos de 1940 - até a atualidade, por exemplo, na combobox este ano, teria que ter anos entre 1940/2013 e no ano que vem 1940/2014 sem que precise fazer um update no sistema para ter que adicionar mais 1 ano na combobox!

    Agradeceria se alguém pudesse me ajudar com esse problema, obrigado desde já ^^


    segunda-feira, 21 de outubro de 2013 00:56

Respostas

  • Pessoal, pesquisando aqui encontrei como fazer

    Dim Data As DateTime = DateTime.Now
            Dim AnoAtual As Integer = Data.Year
            For Anos = 1940 To AnoAtual
                CBAno.Items.Add(CStr(Anos))
            Next Anos

    Obrigado ^^
    segunda-feira, 21 de outubro de 2013 01:20
  • Diego,

    Pode poupar de criar as variáveis fazendo assim:

            For data = 1940 To DateTime.Now.Year
    
                ComboBox1.Items.Add(data)
    
            Next



    Diego Almeida Barreto
    System Analyst / Software Developer

    segunda-feira, 21 de outubro de 2013 10:47

Todas as Respostas

  • Pessoal, pesquisando aqui encontrei como fazer

    Dim Data As DateTime = DateTime.Now
            Dim AnoAtual As Integer = Data.Year
            For Anos = 1940 To AnoAtual
                CBAno.Items.Add(CStr(Anos))
            Next Anos

    Obrigado ^^
    segunda-feira, 21 de outubro de 2013 01:20
  • Diego,

    Pode poupar de criar as variáveis fazendo assim:

            For data = 1940 To DateTime.Now.Year
    
                ComboBox1.Items.Add(data)
    
            Next



    Diego Almeida Barreto
    System Analyst / Software Developer

    segunda-feira, 21 de outubro de 2013 10:47
  • Obrigado pela dica amigo, se tornar menor o código mesmo ^^
    quinta-feira, 24 de outubro de 2013 18:04