Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

phgs1996

Criar objeto via código.

Recommended Posts

Galera, como faço para criar um objeto via código, tipo:

"Insira a quantidade de textbox: (eu digito 5)"

 

Então, aparece outro form com 5 textbox.

Desde já, agradeço !

Compartilhar este post


Link para o post
Compartilhar em outros sites

Você vai precisar de um Array de objetos:

 

 

Dim txtArray As TextBox()
        Dim segundoform As Form = New Form()
        Dim quantidade As Integer = Convert.ToInt32(seuTextBox.Text)


        For i As Integer = 0 To quantidade
            //adiciona controle ao array
            txtArray(i) = New TextBox()
            //adiciona controle ao segundo form
            segundoform.Controls.Add(txtArray(i))
        Next

Mas neste caso ele vai ficar sem nenhuma orientação, se você quiser algo, por exemplo, um embaixo do outro, vai ter que fazer diferente:

 

 

 Dim txtArray As TextBox()
        Dim segundoform As Form = New Form()
        Dim quantidade As Integer = Convert.ToInt32(seuTextBox.Text)
        Dim posX As Integer = 30 //Posição inicial X do textbox (Teste antes)
        Dim posY As Integer = 20 //posição inicial Y do textbox 


        For i As Integer = 0 To quantidade
            //adiciona controle ao array
            txtArray(i) = New TextBox()


            txtArray(i).Location = New System.Drawing.Point(posX, posY)
            posY += 25 //Soma o valor da altura de uma textbox (20) mais um espaço (5) para separar as textboxes entre si


            //adiciona controle ao segundo form
            segundoform.Controls.Add(txtArray(i))
        Next

 

Lembrando que você pode abrir um form e testar a melhor posição X para a textbox, assim como a posição Y, mas o que vai ser interessante é a soma que você vai ter que fazer para que elas fiquem separadas.

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.