Vista la introducción a este tema, vamos a ver la parte propia de cada lenguaje.
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.
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.
© Antonio Arjona Cornejo. Todos los derechos reservados.
Prohibida la reproducción por cualquier medio.
Publicación web autorizada a aulaClic S.L.
Cursos Informática Gratuitos Síguenos en: Facebook Sobre aulaClic Política de Cookies