Delphi:function fGetStr(s1, s2: PChar): PChar; 
begin
        Result := s1 + s2;
end;VB:怎么调?