PDF download Descargar el PDF PDF download Descargar el PDF

¿Tienes problemas con los conceptos de “función” en VB (Visual Basic)? Si es así, lee esta guía para que puedas aprender acerca de las llamadas a funciones en el paradigma de VB.

    • Usa un procedimiento de función cuando necesites devolver un valor al código de llamada.
    • Una función tiene un tipo, y la función devolverá un valor a la subrutina de llamada basándose en el código que contenga.
    • Solo es posible definir una función a nivel del módulo. Esto significa que el contexto de declaración de una función debe ser una clase, estructura, módulo o interfaz, y no puede ser un archivo de código fuente, procedimiento o bloque.
    • Una función se declara de la misma manera que una subrutina, excepto en que debes usar la palabra clave “Function” en lugar de “Sub”.
    • Las funciones por defecto tienen acceso público. Puedes ajustar su nivel de acceso con los modificadores de acceso.
    • Llamas a una función con el nombre del procedimiento, seguido de la lista de argumentos entre paréntesis, en una expresión.
    • Puedes omitir los paréntesis sólo si no proporcionas argumentos. Sin embargo, el código es más legible si incluyes siempre los paréntesis.
    • Una función también puede ser llamada usando una instrucción Call, en cuyo caso se ignora el valor de retorno.
    • Para devolver un valor, asigna un valor del tipo apropiado para el nombre de la función, como si se tratara de una variable.
    Anuncio

Sintaxis

Declaración

[ <attributelist> ] [ accessmodifier ] [ proceduremodifiers ] [ Shared ]
Function name [ (Of typeparamlist) ] [ (parameterlist) ] [ As returntype ]
    [ statements ]
    [ Exit Function ]
    [ statements ]
End Function

Llamado

'Sin Call
Function_Name()
    
'Con Call
Call Function_Name()

Ejemplo

Ejemplo de una función que sumo dos números

 Private 
 Function 
 Add 
 ( 
 ByVal 
 x 
 As 
 Integer 
 , 
 ByVal 
 y 
 As 
 Integer 
 ) 
 As 
 Integer 
 Dim 
 Res 
 as 
 integer 
 Res 
 = 
 x 
 + 
 y 
 Add 
 = 
 Res 
 End 
 Function 
 Private 
 Sub 
 Form_Load 
 () 
 Dim 
 a 
 As 
 Integer 
 Dim 
 b 
 As 
 Integer 
 Dim 
 c 
 As 
 Integer 
 a 
 = 
 32 
 b 
 = 
 64 
 c 
 = 
 Add 
 ( 
 a 
 , 
 b 
 ) 
 MsgBox 
 ( 
 "Sum is : " 
 & 
 c 
 ) 
 End 
 Sub 

Acerca de este wikiHow

Esta página ha recibido 38 285 visitas.

¿Te ayudó este artículo?

Anuncio