CLR: .Net / Mono / Boo / Otros CLR > VB .NET
Controles Dinamicos
(1/1)
Marauder:
Hola a todos,estoy creando unos controles dinamicos a traves de un boton,con este código:
Public cb2 As New ComboBox()
Y dentro del evento Click del boton:
i = i + 1
Me.Controls.Add(cb2)
cb2.Name = "CBBusqueda" & i
cb2.Location = New Point(48, (i * 50))
cb2.Size = New Size(224, 21)
cb2.DropDownStyle = ComboBoxStyle.DropDownList
cb2.MaxDropDownItems = 7
Pero lo que ocurre es que cuando le doy otra vez al boton para añadir otro combo, lo que me hace es borrar el que ya tenia y crear el otro en la posicion deseada,¿sabe alguien cual es el problema y/o como solucionarlo?.
Muchas gracias de antemano.
The Black Boy:
prueba esto
--- Código: Text --- Dim i As Integer Private comboBox1 As System.Windows.Forms.ComboBox Private Sub crear_combobox() i = i + 1 Me.comboBox1 = New System.Windows.Forms.ComboBox Me.comboBox1.Name = "busqueda" & i Me.comboBox1.Anchor = ((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right) Me.comboBox1.DropDownWidth = 280 Me.comboBox1.Items.AddRange(New Object() {"Item 1", "Item 2", "Item 3", "Item 4", "Item 5"}) Me.comboBox1.Location = New System.Drawing.Point((8), (100 * i)) Me.comboBox1.Size = New System.Drawing.Size(280, 21) Me.comboBox1.TabIndex = 7 Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.comboBox1}) Me.Text = "ComboBox Sample" End Sub ____________________________________________________________________ Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click crear_combobox() End Sub
Ejecuta en Modo Maximizado...
Espero te sirva ...
Saludos :hola:
Marauder:
Muchas gracias por tu ayuda pero cuando intento ejecutar ese codigo, el visual empieza la operacion de generar y se queda colgado.
The Black Boy:
amigo, yo lo probé antes de enviartelo y me funcionó asi que no se que es lo que te pueda estar sucediendo.. mira bien y vuelve a probarlo..
cualquier cosa me dices
Saludos
Navegación
Ir a la versión completa