Duda sobre programación orientaba a objetos. - VB-MUNDO

Public · #1 (**permalink**) 17-01-2007, 22:37:29

Hola, estoy migrado de vb6 a vb.net.

En vb6 hago una programació lo mas parecido a orientado a objetos. Mi pregunta es la siguiente

en vb6 creaba una clase y desde ella instanciaba un formulario y para que el formulario se "comunicara" con la clase le creaba una propiedad tipo objeto y la igualaba a la clase

En el formulario

Código:

dim Parent as Object

En la clase

Código:

dim miForm as Form

Set miForn = New Form
set miForm.Parent = Me

con esto desde el formulario podía hacer referencia a métodos de la clase

Código:

Parent.miMetodo1
Parent.miMetodo2 (parametro1)

Cómo hago esto en VB .NET??

Gracias.

Korku · #2 (**permalink**) 17-01-2007, 22:48:03

Hola,

Es casi lo mismo pero en .NET desaparece "Set".

Un saludo

Public · #3 (**permalink**) 18-01-2007, 06:59:14

Y para qué sirve la propiedad Parent que he visto por ahí????

Korku · #4 (**permalink**) 18-01-2007, 08:45:55

Cita:

Empezado por Public

Y para qué sirve la propiedad Parent que he visto por ahí????

Obtiene o establece el contenedor principal del control.

Valor de la propiedad
Objeto Control que representa al control principal o control contenedor del control.

Comentarios
Cuando la propiedad Parent se establece en una referencia nula (Nothing en Visual Basic), el control se quita de la Control.ControlCollection de su control principal actual.

Ejemplo

Código:

' This example uses the Parent property and the Find method of Control to set
' properties on the parent control of a Button and its Form. The example assumes
' that a Button control named button1 is located within a GroupBox control. The 
' example also assumes that the Click event of the Button control is connected to
' the event handling method defined in the example.
Private Sub button1_Click(sender As Object, e As System.EventArgs) Handles button1.Click
   ' Get the control the Button control is located in. In this case a GroupBox.
   Dim control As Control = button1.Parent
   ' Set the text and backcolor of the parent control.
   control.Text = "My Groupbox"
   control.BackColor = Color.Blue
   ' Get the form that the Button control is contained within.
   Dim myForm As Form = button1.FindForm()
   ' Set the text and color of the form containing the Button.
   myForm.Text = "The Form of My Control"
   myForm.BackColor = Color.Red
End Sub

Por si no tienes la ayuda de MSDN...

Un saludo

Public · #5 (**permalink**) 18-01-2007, 11:18:25

Aclarado.

Pensaba que esa propiedad guardaba una referencia al objeto padre que creaba el objeto.

Seguiré con el curso que estoy haciendo, puede que esto me lo aclare posteriormente, pero tenía esa duda ahora mismo y no me he podido resistir a probar.

Gracias.