Llamado a un Sub con un Form como referencia

15/03/2005 - 17:43 por Marcos Beccar Varela | Informe spam
Hola, sigo con dudas ya que estoy migrando aplicaciones de VB 6 y hay cosas
que sigo sin encontrar en la web.

yo tengo este Sub en un modulo del VB 6 que posciciona elementos de imagenes
y otros mas que son comunes a varios forms
En VB 6 los llamaba desde cada formualrio pasandole el nombre del
formulario como parametro. Actualmente no encurntro la forma de reemplazarlo
ya que me pide un tipo de referencia y no se cual sea si ese es el unico
problema..
Gracias a todos de nuevo. saludos




<< en cada form que queria organizar dichos elementos.
mk_designs(me)

<< sub almacenado en un modulo comun al proyecto
Sub mk_designs(mkform)
With mkform
.barsup.Top = 0
.barsup.Left = 0
.barsup.ZOrder 0
.barsup.Width = mkform.Width - mkform.barsup2.Width
End With
End Sub
 

Leer las respuestas

#1 ajpb
15/03/2005 - 18:15 | Informe spam
En .Net los forms se manejan de forma muy distinta a VB6 pues ahora son
clases, tienes que crearlos y destruirlos a lo largo de tu aplicacion para
evitar leaks. Yo acostumbro a declararlos en un clase aparte e instanciarlos
cada vez que los necesito y una vez que los cierro los destruyo. Aqui hay un
articulo

http://www.devcity.net/Articles/94/...forms.aspx

Saludos

"Marcos Beccar Varela" wrote:

Hola, sigo con dudas ya que estoy migrando aplicaciones de VB 6 y hay cosas
que sigo sin encontrar en la web.

yo tengo este Sub en un modulo del VB 6 que posciciona elementos de imagenes
y otros mas que son comunes a varios forms
En VB 6 los llamaba desde cada formualrio pasandole el nombre del
formulario como parametro. Actualmente no encurntro la forma de reemplazarlo
ya que me pide un tipo de referencia y no se cual sea si ese es el unico
problema..
Gracias a todos de nuevo. saludos




<< en cada form que queria organizar dichos elementos.
mk_designs(me)

<< sub almacenado en un modulo comun al proyecto
Sub mk_designs(mkform)
With mkform
.barsup.Top = 0
.barsup.Left = 0
.barsup.ZOrder 0
.barsup.Width = mkform.Width - mkform.barsup2.Width
End With
End Sub



Preguntas similares