Visual Basic para Aplicaciones - crear pbjetos

Life is soft - evento anual de software empresarial
 
Vista:

crear pbjetos

Publicado por alejandro (34 intervenciones) el 14/05/2001 04:37:09
hola:
auisiera saber como puedo hacer para crear objetos (por ejemplo un PictureBox) pero a medida que los precise.
es decir en tiempo de ejecucion
gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:crear pbjetos

Publicado por Mike79 (6 intervenciones) el 15/05/2001 08:40:46
Con el comando Load puedes agregar y quitar elementos segun necesites.

Recorde que VBasic traia antes un ejemplo donde creaba objetos dinamicamente con el comando Load, pero no lo encontre, asi que me tome la molestia de crear un pequeño programa de ejemplo:

La forma mas facil (que yo conosco), para crear un objeto dinamicamente, es crear primero un arreglo de dicho objeto, y luego llamar a Load y decirle que carge un nuevo elemento de ese arreglo.
¿me explique?, talvez no, observen el ejemplo y vean que pasa:

'--- Este ejemplo necesita un command button llamado: Command1
'Con la propiedad Index = 0
Corre el programa y luego has click sobre cualquier parte del formulario y sobre cualquier boton
'
Dim n As Integer

Private Sub Command1_Click(Index As Integer)
Me.Caption = "Precionastes el Boton No.-" + Str(Index)
End Sub

Private Sub Form_Click()
n = n + 1
Load Command1(n)
Command1(n).Caption = "boton " + Str(n)
Command1(n).Left = (n - 1) * Command1(n).Width
Command1(n).Top = 0
Command1(n).Visible = True
End Sub

Private Sub Form_Load()
n = 0
Command1(0).Caption = "Boton 0"
Command1(0).Width = 975
Command1(0).Height = 615
End Sub

'-------------------------

Espero te sirva
Esta es solo una forma, y talvez no es la mas adecuada, pero creo que es bastante facil de entender y usar.
Saludos!!
-
Mike79
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar