Visual Basic - muy facil, paso x referencia

Hola:

Utilizo esta funcion para modificar el valor de la cadena:
Private Sub rellenar(ByRef cadena As String)
Dim longitud As Long
longitud = Len(cadena)
cadena="a"

End Sub
y no me aparece cambiado fuera de la función,xq?
Gracias

Hola Arturo:

Lo probé porque me parecía que lo tenía que cambiar, y efectivamente te lo cambia por "a".

Abre un proyecto nuevo, coloca un botón de comando y pega el código:

Private Sub rellenar(ByRef cadena As String)
Dim longitud As Long
longitud = Len(cadena)
cadena = "a"
End Sub

Private Sub Command1_Click()
Dim a As String

a = "sfdaf"
rellenar a
MsgBox a
End Sub

Te da "a".

Ahora supongo que tu función debe querer hacer otra cosa, la longitud no la usas, estimo que este era un ejemplo que supuestamente daba el error de no cambiar el parámetro cadena, pero a mi no me sucedió así.

Saludos,
Javier

Ese procedimiento que escribiste funciona bien.
pero Visual Basic usa el paso de variables por referencia automaticamente, osea estos dos procedimientos son iguales:

Private Sub Rellenar(ByRef Cadena As String)
Private Sub Rellenar(Cadena As String)

no necesitas poner ByRef, sobre lo tuyo, no hay error.
quizas tratas de decir otra cosa.
Lima - Peru