关于取EXCEL中的内容的问题！看看我的程序问题在那里！

为了取出EXCEL中的内容，我先做了一个往已经存在的EXCEL文档中修改内容的程序！是可行的，程序修改了cells(2,1)cells(2,2)中的内容。如下：
procedure TForm1.Button2Click(Sender: TObject);
var
  eclApp,WorkBook:Variant;
  xlsFileName:string;
  i:integer;
begin
  xlsFileName:='aa.xls';  try
    //创建OLE对象Excel Application与 WorkBook
    eclApp:=CreateOleObject('Excel.Application');
    WorkBook:=CreateOleobject('Excel.Sheet');
    except
      ShowMessage('您的机器里未安装Microsoft Excel。');
      Exit;
  end;  WorkBook:=eclApp.workBooks.Open(xlsFileName);  eclApp.Cells(2,1):='000003';  //1
  eclApp.Cells(2,2):='zyl';    //2
 
 WorkBook.save;   //3
  WorkBook.Close;
  eclApp.Quit;
  //退出Excel Application
  //释放VARIANT变量
  eclApp:=Unassigned;
end;可是，我现在要取出cells(2,1)中的内容，于是，我将程序1、2部分改为label1.caption:=eclApp.Cells(2,1),去掉3部分，结果就不行了，告诉我‘对象找不到’我搞不懂了：eclApp.Cells(2,1)难道只能赋值，不能取值吗？哪位高手指点下！！谢谢！