• Lunes 29 de Abril de 2024, 06:54

Autor Tema:  Re: CREAR OBJETOS CON INDEX  (Leído 961 veces)

Ronstone

  • Miembro activo
  • **
  • Mensajes: 29
    • Ver Perfil
    • http://annyronny.iespana.es
Re: CREAR OBJETOS CON INDEX
« en: Viernes 28 de Febrero de 2003, 21:01 »
0
NECESITO CREAR UN TEXBOX EN MODO DE EJECUCION CON COMONDOS ALGUIEN PODRIA AYUDARME
Saludos RonStone...

José D

  • Miembro MUY activo
  • ***
  • Mensajes: 235
    • Ver Perfil
CREAR OBJETOS CON INDEX
« Respuesta #1 en: Viernes 28 de Febrero de 2003, 23:45 »
0
Dajeme ver si te entendí bien.

Quieres hacer TextBox en ejecución, si eso es correcto, entonces esto te va a servir:

Suponiendo que lo crees al pulsar en un CommandButton:

Dim T1 As Control

Set T1 = Controls.Add("VB.TextBox", "Un_nombre")
T1.Visible = True

Esto va en (General)-(Declaraciones):
Private WithEvents T1 As TextBox

Los eventos tendrás que escribirlos a pie tu mismo:

Private Sub T1_Change()
'hacer algo...
End Sub

Private Sub T1_KeyPress(keyascii As Integer)
'hacer algo...
End Sub

El VB reconocerá que eso es referente a un objeto, y no una función, aunque el objeto no esté presente en el Formulario en diseño.

No sé cómo se harian los eventos del objeto si éste, no está en diseño, sino que se crea en plena ejecución, el manejo que tengo sobre esto es limitado.

Esto se aplica igual para hacer CommandButton, Label y otros.
Tendrás que poner un posicionamiento porque por defecto, lo pone en el borde superior izquierdo del Formulario.

Saludos.
Saludos