comment
IRC Chat
play_arrow
Este sitio utiliza cookies propias y de terceros. Si continúa navegando consideramos que acepta el uso de cookies. OK Más Información.

Como crear controles en tiempo de ejecuacion

  • 0 Respuestas
  • 1249 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Conectado ANTRAX

  • *
  • Administrator
  • Mensajes: 5401
  • Actividad:
    38.33%
  • Reputación 31
  • ANTRAX
    • Ver Perfil
    • Underc0de
    • Email
  • Skype: underc0de.org
  • Twitter: @Underc0de
« en: Julio 26, 2010, 01:21:37 pm »
'Ejemplo de creación de controles en tiempo de ejecución

'Llevará la cuenta de los controles creados

Código: Visual Basic
  1. Option Explicit
  2. Private numControles As Long
  3. Private Sub cmdCrear_Click()
  4.     'Crear un nuevo control de cada tipo'numControles está declarada a nivel de módulo
  5.    numControles = numControles + 1
  6.     'Crear los controles
  7.    Load Label1(numControles)
  8.     Load Text1(numControles)
  9.  
  10.     'Posicionarlos y hacerlos visibles
  11.    With Label1(numControles)
  12.         .Visible = True
  13.         .Top = Label1(numControles - 1).Top + .Height + 120
  14.         .Caption = "Label1(" & numControles & ")"
  15.     End With
  16.     With Text1(numControles)
  17.         .Visible = True
  18.         .Top = Text1(numControles - 1).Top + .Height + 60
  19.         .Text = "Text1(" & numControles & ")"
  20.     End With
  21. End Sub

'Eliminar un elemento de cada control anteriormente creado'El control

Código: Visual Basic
  1. Private Sub cmdEliminar_Click()
  2.     CERO no se puede eliminar
  3.     If numControles > 0 Then
  4.         'Descargarlos de la memoria
  5.        Unload Label1(numControles)
  6.         Unload Text1(numControles)
  7.         numControles = numControles - 1
  8.     End If
  9. End Sub
« Última modificación: Mayo 12, 2014, 03:17:15 pm por Expermicid »


 

¿Te gustó el post? COMPARTILO!



Como leer caracter por caracter de una cadena string

Iniciado por ANTRAX

Respuestas: 0
Vistas: 1423
Último mensaje Julio 26, 2010, 11:42:21 am
por ANTRAX
Cómo ajustar la cadena introducida a formato de hora "00:00:00"

Iniciado por ANTRAX

Respuestas: 0
Vistas: 1580
Último mensaje Julio 26, 2010, 12:36:23 pm
por ANTRAX
Cómo ajustar la cadena introducida a formato numérico: "#,##"

Iniciado por ANTRAX

Respuestas: 0
Vistas: 1222
Último mensaje Julio 26, 2010, 12:38:04 pm
por ANTRAX
Manual de como bloquear CTRL+ALT+SUP, ALT+TAB, Y OTROS con Visual Basic en WinXP

Iniciado por ANTRAX

Respuestas: 0
Vistas: 1888
Último mensaje Julio 26, 2010, 11:11:14 am
por ANTRAX
Como pasar de un TextBox a otro pulsando ENTER

Iniciado por ANTRAX

Respuestas: 0
Vistas: 10694
Último mensaje Julio 26, 2010, 03:41:24 pm
por ANTRAX