请问以下代码怎么有这样的提示呢?
var
  vRXNF,vxbdm,vsql,vxbmc: string;
begin
 vRXNF :=FormatDateTime('yyyy',DateTimepicker1.DateTime);
 vxbmc :=xbmc.Text;
 begin
 with ADOQuery do
  begin
   Close;
   Params.ParamValues['xbmc'] :=vxbmc;
   Open;
   vxbdm :=FieldValues['xbdm'];
   Close;
  end;
 end;
 edXH.Text := vRXNF + vxbdm + GetID(vRXNF + vxbdm) ;
请各位大师指教,