Foro de elhacker.net

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

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

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

BBB (AAA)
 

Usa:

Call BBB(AAA)
 

ó

BBB AAA
 

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

Saludos!

 :o  :xD simplemente gracias no sabia :xD :P  :)