请举例一个读取Excel文件中的第二行，第三列的值然后赋给Lable，请高手写出code如何？

Question

这问题我研究很长时间了,可是无法实现,不知哪位高手可以指教?谢谢!

Answer 1

用ADO控件，Excel2000 可以象数据库一样的操纵，用ACCESS的驱动程序
SQL:Select * from forecast然后你就可以象数据库一样

Answer 2

uses ComObj;var
    ExcelApp,MyWorkBook: OLEVariant;
begin
if opendialog1.Execute then
  begin
    try
      ExcelApp:=CreateOleObject('Excel.Application');
      MyWorkBook:=CreateOleobject('Excel.Sheet');
    except
      application.Messagebox('无法打开Xls文件，请确认已 经安装EXCEL.','',
           mb_OK+mb_IconStop);
      Exit;
    end;
    MyworkBook:= ExcelApp.workBooks.Open(opendialog1.FileName);
    //打开文件后，对文件进行操作
    label1.caption:= MyWorkBook.WorkSheets[1].Cells[2,3].Value;
end;

Answer 3

Drate,谢谢你了！你提供的代码很好！