Visual Basic - SQL Server y VB

necesito tomar el valor de un parametro de salida de un store procedure(procedimiento almacenado), como es que puedo hacer esto. Ya tengo el siguiente código pero aun no funciona, me marca error cuando lo ejecuto:

Dim parametro As ADODB.Parameter
Dim iSaldo As Integer
On Error GoTo SubError
Set Comando = New ADODB.Command
Set Comando.ActiveConnection = DB
Comando.CommandText = "pAgencia_Saldo"
Comando.CommandType = adCmdStoredProc

Set parametro = Comando.CreateParameter("AgenciaID", adNumeric, adParamInput, , AgenciaID)
Comando.Parameters.Append parametro
Set parametro = Comando.CreateParameter("dtFecha", adDate, adParamInput, , Date)
Comando.Parameters.Append parametro
Set parametro = Comando.CreateParameter("iSaldo", adNumeric, adParamOutput, , 0)
Comando.Parameters.Append parametro
Comando.Execute
Saldo = Comando.Parameters(2).Value
SubError:

De antemano muchas gracias

Hola.
creo que tu problema es que no declaras el parametro que guarda el valor devuelto por el procedimiento.
si añades a la coleccion de parametros uno que sea del tipo adParamReturnValue el procedimiento te devolvera su resultado en el, luego solo tienes que sacarlo de la coleccion de parametros del objeto command.
pruebalo y me cuentas si no entiendes algo.
un saludo.
fernando