Unidad 24. Cómo programar una clase en VB (I)





24.1. Objetivos del tema.

Vista la introducción a este tema, vamos a ver la parte propia de cada lenguaje.

24.2. Introducción.

Programar es un tema muy personal, de estilo, de gustos y más si hablamos de un elemento como una clase que luego se integra en un programa, donde los matices son muy importantes y cada cual los ve o aprecia de forma distinta.

No vamos a entrar en todas las posibilidades de las clases, sino se convertiría en un apartado muy extenso, y la pretensión es la de sentar un punto de partida, para que a partir de ahí se siga progresando.

Hay que tener presente que en todo desarrollo de código hay que tener siempre un tratamiento de errores, al cual aun no hemos llegado y que aquí no se contempla, pero de lo cual hay que dejar constancia.

24.3. Declarar un objeto de esa clase.

En este punto es cuando se instancia el objeto, y en el que se queda configurado con los valores por defecto que nosotros hayamos asignado a las variables internas, y a las propiedades.

 

Dim Objeto as New ClaseDefinidaExistente

 

Ahora hay que escribir la clase, y hay que escribirla en función de esos parámetros que hemos comentado que se han de dar en el inicio del objeto.

 

Decidir que tipo de inicialización nos interesa.

Estudiar cuantas posibilidades de inicio nos puede interesar para escribir las sobre cargas adecuadas.

Recepción y control de los datos necesarios en la inicialización.

Valores iniciales de variables y propiedades adecuados.

 

Public Class Ejemplo

  Dim Variable As String = "Variable inicializada"

  Dim Propiedad As String = "Propiedad inicializada"

 

  Private Sub New()

    ‘ esto impide la creación de un objeto .

  End Sub

 

  Public Sub New(ByVal Valor As String)

    Propiedad = Valor

  End Sub

End Class

 

Este ejemplo nos obliga a declarar el objeto con la siguiente sintaxis.

 

  Dim Objeto As New Ejemplo("Inicialización")

 

Impide que se pueda utilizar

 

  Dim Objeto As New Ejemplo

 

Por lo que si nosotros añadimos en el método New de la clase el siguiente código

 

  Private Sub New()

 

  End Sub

 

  Public Sub New(ByVal Valor As String)

    If  Valor <> "" Then Propiedad = Valor

  End Sub

 

Si al inicializar la clase no se recibe un valor adecuado la clase quedaría inicializada con el valor por defecto de la propiedad, sin asumir el valor recibido.

 

Si la clase es heredada desde otra clase la condición se mantiene, vemos un ejemplo.

 

Public Class Heredera

  Inherits Ejemplo   ‘ Heredar la clase del ejemplo anterior

 

  Public Sub New()

    ‘ El primer paso es llamar al New de la clase origen, y proporcionar

    ‘ un valor de inicialización.

    MyBase.New("Valor desde la clase heredera")

  End Sub

End Class

 

Todo lo anterior se puede probar desde el código siguiente.

 

Module Tema_24

  Sub Main()

    Dim Objeto As New Ejemplo("Valor de inicialización")

    Console.WriteLine(Objeto.Propiedad)

    Dim Otro As New Heredera

    Console.WriteLine(Otro.Propiedad)

    Console.Read()

  End Sub

End Module

 

 

Que produce el siguiente resultado

 

Como vemos en los ejemplos, la adecuada utilización del método New es importante.

 

Por lo tanto ya se ha cubierto una primera etapa que es la de controlar la creación de un objeto de nuestra clase de forma incontrolada.

El siguiente paso es la declaración de las variables.

Octubre-2010
Pág. 24.1

Atrás  Inicio  Adelante






Página inicial  Cursos Informática Gratuitos

Síguenos en:   Facebook       Sobre aulaClic            Política de Cookies