Necesitas crear el parámetro de salida, como ya lo indica el caballero del zodiaco:
Código:
Set param = oCom.CreateParameter("nombre_parametro", *adInteger, adParamOutput, *4)
oCom.Parameters.Append(param)
oCom.Execute
variable = oCom.Parameters("nombre_parametro")
Salud
*Tipo y tamaño variable