Ver Mensaje Individual
  #2 (permalink)  
Antiguo 18/09/2008, 08:52
Avatar de David
David
Moderador
 
Fecha de Ingreso: abril-2005
Ubicación: In this planet
Mensajes: 15.720
Antigüedad: 20 años
Puntos: 839
De acuerdo Respuesta: Como crear objetos dinamicos

Para crear objetos hay dos métodos, añadir el control a Me.Controls o indexarlo.
Código vb:
Ver original
  1. 'Añadir a Me.Controls (Creamos un botón, pero puede ser otro control)
  2. Dim button As CommandButton
  3. Set button = Controls.Add("VB.CommandButton", "NewButton")
  4. button.Visible = True
Código vb:
Ver original
  1. 'En este caso tenemos un botón (Command1) indexado (Index = 0) y a partir de él creamos una copia
  2. Load Command1(Command1.Count)
  3. Command1(Command1.Count - 1).Visible = True
  4. Command1(Command1.Count - 1).Left = 15
  5. Command1(Command1.Count - 1).Top = 15
__________________
Por favor, antes de preguntar, revisa la Guía para realizar preguntas.