Evento para Checkbox dinamicos

Jcornejo
30 de Diciembre del 2005
Tengo una ventana en la cual deseo generar varios checkbox de control por cada resultado y al mismo tiempo cada uno de estos checkbox al momento de haver click de verificación, activo otra rutina para mostrar mas checkbox, el problema es como controlo la actividad de cada checkbox creado dinamicamente, este es el codigo :

Do While Not Rs.EOF
NameChk = "Chkb" + wcodmenu + "_" + Rs!cod_menu
Set ChkbObject = FrmPermisos.Controls.Add("VB.CheckBox", NameChk)
ChkbObject.Caption = " " + Rs!descripcion
ChkbObject.Top = wtop
ChkbObject.Left = wleft
ChkbObject.Height = 300
ChkbObject.Width = 500 + (Len(Rs!descripcion) * wwidth)
ChkbObject.Visible = True
Rs.MoveNext
wtop = wtop + wespacin

espero respuestas
gracias

Edgarin
30 de Diciembre del 2005
Yo te recomiendo que crees los checkbox no con Add sino con Load, su nombre puedes ponerlo en la propiedad Tag, asi en un solo evento (supongo que el Click), y preguntando por el indice o el Tag puedes programar sus actividades

Recuerda que para load, debes crear un checkbox con index=0, digamos chkHola en tiempo de diseño, y para crear otro demas haces Load(chkHola(indice)), esto dentro de un bucle para que cree varios.

Saludos
Edgarin

Jcornejo
30 de Diciembre del 2005
Gracias por el consejo Edgarin