No se traducir un codigo VB

[rafa_adrim]

No funciona, ya lo habia pensado pero el compilador peta.
Debe ser algo como cuando se quiere crear un objeto outlook que se hace de la siguiente manera:

Código Delphi [-]
var
  outlook: OleVariant;
begin
   outlook := GetActiveOleObject('Outlook.Application');

Pero no he encontrado aún como hacerlo.
Gracias de todas maneras.