elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
29 Mayo 2012, 08:57  


Tema destacado: Suscripción al boletín mensual de elhacker.net

+  Foro de elhacker.net
|-+  Programación
| |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo, raul338)
| | |-+  problemas con byref!
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: problemas con byref!  (Leído 343 veces)
RHL


Desconectado Desconectado

Mensajes: 968


mental


Ver Perfil
problemas con byref!
« en: 3 Agosto 2011, 10:12 »

buenaaaas a todooos :( tengo un gravisimo problemaa y no tengo idea que pasaa!
es acerca de pasar los problemas por referencia
el codigo:

Código
Private Sub Form_Load()
Dim AAA As Integer
 
AAA = 50
 
BBB (AAA)
Debug.Print AAA
End Sub
 
 
Sub BBB(ByRef X As Integer)
X = X + 50
End Sub


al imprimir la variable AAA es valor es 50!!! y no 100!! es como que si me pasara la variable por valor que pasa? que hago mal perdon si es algo tonto :P :xD pero estoy impactado :xD

lo e seguido con el depurador y en el procedimiento BBB el valor de X cambia normal a 100 pero cuando retorna al form el valor cambia a 50! x3
gracias


« Última modificación: 3 Agosto 2011, 23:34 por raul338 » En línea
ignorantev1.1


Desconectado Desconectado

Mensajes: 424


/\ Así acabo cuando quiero programar...


Ver Perfil WWW
Re: problemas con byref!
« Respuesta #1 en: 3 Agosto 2011, 16:28 »

A la hora de llamar a la funcion "AAA", en vez de:

Código
BBB (AAA)
 

Usa:

Código
Call BBB(AAA)
 

ó

Código
BBB AAA
 

Ya que usar una variable en parentesis se esta indicando el valor de la variable.

Saludos!


En línea


RHL


Desconectado Desconectado

Mensajes: 968


mental


Ver Perfil
Re: problemas con byref!
« Respuesta #2 en: 3 Agosto 2011, 19:10 »

 :o  :xD simplemente gracias no sabia :xD :P  :)
En línea
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines