Unidad 16. Clases, Código en VB (I)





16.1. Objetivos del tema.

Hemos visto los datos en el tema anterior, veamos ahora los métodos.

Veamos ahora los métodos desde VB, y como enfocarlos.

16.2. Introducción.

Los métodos es la zona donde se alberga el código ejecutivo de la clase, código ejecutivo de la clase porque en la captura de datos de las propiedades también hay código, pero es el dedicado a la validación de dicha captura de datos, y en el constructor, new, también hay código pero es el encargado de la fase de inicialización de marcar los valores iniciales requeridos en la clase para el objeto.

Si no existiera código en la misma, la clase puede seguir existiendo, pero lo único que podríamos hacer con ella es crear una estructura de datos, más o menos compleja.

16.3. Código en las Funciones, Procedimientos.

Para desarrollar una clase es necesario escribir un “pequeño programa”, y ese pequeño programa se compone de una parte pública que son los métodos.

Estos métodos, podemos decir que son el punto de inicio de una acción, una acción que inicia el programa cuando reclama su presencia, es decir podríamos decir que una clase tiene un sin fin de puntos de inicio, cada uno de los métodos, además del principal que es el constructor, en VB new - si descartamos el código de las propiedades -, por lo tanto, como deseamos crear un código sencillo, estructurado y ordenado, es necesario que el código en el método sea breve.

Para ello el código de un método se compone, o se puede componer, de llamadas a procedimientos y funciones que se llaman desde el mismo.

Además de esa forma un procedimiento puede compartirse por varios métodos, lo que reduce el volumen de código de la clase.

Así que, en el interior de la clase escribiremos todos los procedimientos y funciones que se necesiten para poder desarrollar todas las acciones que sean necesarias en los métodos.

Como esos procedimientos y funciones se quedan en eso, no en métodos, se declararan como privadas, los métodos son públicos.

16.4. Código en los Métodos.

En los métodos, porque los procedimientos no se activan solos, y de alguna manera han de activarse, y eso se consigue mediante la ejecución ordenada del código que hay en cada uno de los métodos.

Hemos dicho que cada método es como un punto de inicio de un programa, pues en ese punto es donde empieza la acción, y ahí es donde a medida que se van ejecutando las líneas de código, se van escribiendo las llamadas a cada procedimiento.

 

En el ejemplo de clase que sigue, se ha creado un método que visualiza los números primos entre dos valores determinados.

 

Public Class Ejemplo

  Public Sub NumerosPrimos(ByVal Desde As Integer, ByVal Hasta As Integer)

    Dim x As Integer = Desde

    While x <= Hasta

      Select Case Primos(x)

        Case True

          Console.WriteLine("El número {0} es primo", x)

      End Select

      x = x + 1

    End While

  End Sub

 

  Private Function Primos(ByVal Numero As Long) As Boolean

    Dim X As Integer = 3

    Dim Final As Long

    Dim Result As Boolean = True

 

    Final = CLng(Numero / 2) + 1

    Select Case Numero Mod 2 <> 0

      Case True

        While X < Final And Result

          Result = Numero Mod X <> 0

          X = X + 1

        End While

      Case Else

        If Numero > 2 Then Result = False

    End Select

    Primos = Result

  End Function

End Class

 

En la clase vemos como disponemos de un procedimiento que es public, es un método, y de una función que es private, es una función, no es un método.

Podemos comprobarlo porque si escribimos en el entorno de programación, “Objeto.” lo único que podemos ver es NumerosPrimos.

 

En ella vemos como en el método se llama a la función que devolverá cierto o falso en función de que el número sea primo o no.

 

  Public Sub NumerosPrimos(ByVal Desde As Integer, ByVal Hasta As Integer)

    Dim x As Integer = Desde

    While x <= Hasta

      Select Case Primos(x)

        Case True

          Console.WriteLine("El número {0} es primo", x)

      End Select

      x = x + 1

    End While

  End Sub

 

Si observamos el contenido del método, veremos como no encontramos nada que nos pueda resultar extraño, el código no incorpora nada raro, y no es nada más que un bucle mientras

 

  While x <= Hasta

 

con una estructura condicional en su interior

 

  Select Case Primos(x)

 

para visualizar solo aquellos números que sean primos

 

  Console.WriteLine("El número {0} es primo", x)

 

con su correspondiente incremento al final.

 

  x = x + 1

 

Después su utilización en el programa principal será como vemos en el ejemplo.

 

Module Module1

  Sub Main()

    Dim Objeto As Ejemplo = New Ejemplo

    Objeto.NumerosPrimos(10, 50)

  End Sub

End Module

 

Y su aclaración …

 

  Dim Objeto As Ejemplo = New Ejemplo

 

Declaramos el objeto y se instancia.

 

  Objeto.NumerosPrimos(10, 50)

 

Y ejecutamos el método con el rango que deseamos visualizar.

Nada que nos pueda parecer extraño.

El único cambio está en el exterior.

 

Public Class Ejemplo

 

Que esta declarado dentro de una clase que se llama Ejemplo.

 

Y después en el programa principal.

 

  Sub Main()

    Dim Objeto As Ejemplo = New Ejemplo

    Objeto.NumerosPrimos(10, 50)

  End Sub

Octubre-2010
Pág. 16.1

Atrás  Inicio  Adelante






Página inicial  Cursos Informática Gratuitos

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