Pasar por referencia un COleVariant a una función.

Hola a todos:

Quisiera pasar un COleVariant a una función para dentro de ésta asignarle un
valor, la duda que tengo es que no sé cómo tengo que declarar la función.

Esta función recibe la referencia de COleVariant y le debe asignar un valor:
void Funcion2( COleVariant vt) ???? aquí no sé como declararlo.
{
CString s;
... (líneas de código)
s=_T("1234");
vt = (_bstr_t)s
}

Esta función llama a la función 2 para pasarle el COleVariant:
void Funcion1()
{
... (líneas de código)
FieldsPtr pFields = m_pRecordset->Fields; // Conjunto de datos obtenido de
la base de datos.
Funcion2(pFields->GetItem("Codigo")->Value);
// De regreso de la funcion2, "Codigo" debería contener "1234".
... (más líneas de código)
}

Espero haberme explicado bien, gracias por anticipado.

Un saludo.

Tomás.