Unidad 12. Funciones en VB (I)





12.1. Objetivos del tema.

Vamos a ver en este tema las funciones en el lenguaje Visual Basic 2005.

12.2. Introducción.

La programación está basada en las estructuras.

Estructuras de datos y estructuras de programas.

Los programas son a su vez contenedores de estructuras de elementos individuales que ejecutan código.

El elemento más pequeño es la instrucción.

Después nos encontramos con procedimientos y funciones.

El siguiente nivel es la clase y por último el programa.

 

Los procedimientos y las funciones, dependiendo de la estructura del lenguaje utilizado, y del estilo de programación individual de cada uno, están bien en módulos independientes, de forma que son públicos para toda la aplicación, o de forma privada en el interior de un programa, o una clase.

 

En VB, las funciones son funciones y podrán o no pertenecer a una clase y ser un método, se albergará en el interior de una clase, haciendo referencia al mismo mediante el nombre de la clase y a continuación el de la función, método, o si está en el mismo nivel, con utilizar la función es suficiente, como vemos en el ejemplo.

 

  Console.Writeline(“Factorial de 3 es " ,FuncionFactorial(3))

 

Pero no toda la resolución de una clase se realiza mediante código que se pueda o se tenga que traducir en un método.

La programación además se basa en la división de un problema grande, en varios pequeños, aquello de divide y vencerás, por lo que por esa misma filosofía es imposible, e ilógico,  que todo se convierta en métodos.

Los métodos son la parte lógica visible de una clase, lógica en cuanto a que es aquello que cara al usuario le ayuda a resolver un problema en pasos  “ comprensibles “ para él.

Con las funciones sucede lo mismo, al fin y al cabo, no son nada más que otra de las herramientas de programación.

 

Para crear una función la sintaxis es la siguiente:

 

Private Function FuncionFactorial(ByVal n As Integer) As Integer

 

La función puede estar en el programa                                                                      Private

o en un módulo distinto,                                                                                           Public

La palabra reservada que indica que es una función                                                   Function

Después lo que sigue es el nombre de la función,                                                      FuncionFactorial

Entre paréntesis los datos que se reciben, indicando el tipo de cada uno de ellos,      (ByVal  n as Integer)

El tipo de dato que se devuelve en la función,                                                           Integer

A continuación empieza el código de la función que acaba con la línea                       End Function.

 

  Private Function FuncionFactorial(ByVal n As Integer) As Integer

    If (n <= 1) Then

      FuncionFactorial = 1

    Else

      FuncionFactorial = n * FuncionFactorial(n - 1)

    End If

  End Function

 

En el ejemplo vemos la función, esta función calcula el factorial de un número, otro tema es que sea la mejor solución, pero es una función.

 

 

En el siguiente ejemplo se invierte el contenido de una variable de tipo string.

 

  Public Function InvierteCadena(ByVal Cadena As String) As String

    Dim Result As String = ""

    Dim x As Integer

 

    While x <> Len(Cadena)

      x = x + 1

      Result = Mid(Cadena, x, 1) & Result

    End While

    InvierteCadena = Result

  End Function

 

El uso de la función anterior puede quedar :

 

 Cadena = InvierteCadena(Cadena)

Octubre-2010
Pág. 12.1

Atrás  Inicio  Adelante






Página inicial  Cursos Informática Gratuitos

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