[Visual Basic] Clases parciales

Las clases parciales permiten dividir la definición de una clase en varias partes. Las clases parciales no crean múltiples clases, simplemente crean una clase y dicha clase se implementa en diferentes partes.

Para definir una clase parcial basta con colocar antes del class el modificador Partial:

   1:  Partial Class MiClase
   2:  End Class

Ahora un pequeño ejemplo:

1. En un proyecto vamos a crear dos carpetas, la idea será simular que en una carpeta tenemos las clases bases y en la otra vamos a tener las clases que por decirlo de alguna manera siguen con la implementación de dichas clases, algo como:

Imagen1

2. En la carpeta de clases principales vamos a crear una clase que se llame Persona, la cual será pública y parcial, además que va a definir dos propiedades diferentes (nombre y apellido) y un método el cual asignara un valor al nombre, algo bastante simple:

 

   1:  Partial Public Class Persona
   2:      Private Property sNombre As String
   3:      Private Property sApellido As String
   4:   
   5:      Public Sub EstablecerNombre(ByVal nombre As String)
   6:          _sNombre = nombre
   7:      End Sub
   8:  End Class

3. Ahora en la carpeta de clases extendidas creamos una nueva clase llamada Persona y un método que establezca el apellido:

   1:  Public Class Persona
   2:      Public Sub EstablecerApellido(ByVal apellido As String)
   3:          _sApellido = apellido
   4:      End Sub
   5:  End Class

Como se puede observar la clase tiene el mismo nombre, pero al ser una de ellas parcial es compilador no nos genera error.

Ahora una vez utilicemos la clase vamos a disponer de los dos métodos:

   1:  Dim persona1 As New Persona
   2:  persona1.EstablecerNombre("Julio")
   3:  persona1.EstablecerApellido("Apellido")

Claro, el ejemplo que se ha hecho es bastante simple, pero la idea era mostrar el funcionamiento de las clases parciales.

Leave a Reply

Your email address will not be published. Required fields are marked *