Claudia
14 de Mayo del 2003

Hola, alguien me puede decir como se crea un CommboBox en tiempo de ejecucion, es decir explico un poco mas. Tengo un CommboBox creado en un Form y cuando hago click sobre el, me debe crear otro ComboBox en el mismo Form. Trate de hacerlo usando la matriz de indices, es decir al ComboBox1 le puse como nombre CAM con indice "0", luego hice a traves de codigo Load CAM(1) etc, me lo crea sin problemas pero, la idea es que este segundo ComboBox (al hacer click sobre el) me abra otro Form, pero en ves de eso me da un error diciendo que el objeto CAM(1) ya fue creado.
Aca pongo el procedimiento que cree para este evento:

Private Sub cam_Click(Index As Integer)
Load cam(1)
cam(1).Left = 3000
cam(1).Top = 3000
cam(1).Caption = "Cam1"
cam(1).Visible = True
End Sub

Este procedimiento es llamado del Combobox fijo CAM con indice 0.
Si alguien me puede ayudar se lo agradeceria.
muchas gracias

jorge
14 de Mayo del 2003

Para que no te de el error tendras que jugar con el parametro index que indentifica un indice dentro de la matriz de controles, de la siguiente manera:

Private Sub cam_Click(Index As Integer)
Select Case Index
Case 0
Load cam(1)
cam(1).Left = 3000
cam(1).Top = 3000
cam(1).Caption = "Cam1"
cam(1).Visible = True
Case 1
'Mostrar el formulario
End Select
End Sub


De todas formas si solo vas a crear un boton es mas conveniente que utilices lo que ten han citado anteriormente, es decir que crees el boton en diseño y con su propiedad visible a false y la actives cuando selecciones el combo.

Claudia
14 de Mayo del 2003

Disculpen, en realidad me refiero a un "CommandButton" y no a un CommboBox. Me equivoque de nombre de comando.
Gracias

www
14 de Mayo del 2003

Enviame el fuente original con el problema y te envío la solución.

Espero no recibir virus.

envíalo a [email protected]

Guten Nacht !

jessuss
14 de Mayo del 2003

Yo lo que haría sería crearlo desde el ppio pero ponerle la propiedad VISIBLE a False, y al hacer clic sobre el ComboBox, pondría:
CommandButton.VISIBLE = True
Asi lo que consigues es que te aparezca en tiempo de ejecucion.

Prueba