Hola.
No conozco VB y tal vez lo permita, pero en Delphi, aquí tenemos un problema, ya que no es posible asignarle un valor al resultado de una función.
Es decir no se puede hacer:
Código Delphi
[-]
...
function LBR_For_Venus: string;
begin
...
end;
...
var
T,L,B,R : Double;
begin
...
LBR_For_Venus := FloatToStr(L) + '|' + FloatToStr(B) + '|' + FloatToStr(R);
Saludos
