1. 注释:向Excel文档工作表(sheet)单元格(H, L)读出内容存入(sumL)变量
  2. 注释:Call Plugin.Office.OpenXls("C:\测试.xlsx")
  3. 注释:L = 1
  4. 注释:Call Plugin.Office.WriteXls(1, 1, 1, "130")
  5. 注释:Call ReadXlssum (sumL)
  6. 函数 ReadXlssum(L)
  7.     定义变量 sheet, H
  8.     令 sheet = 1
  9.     令 H = 1
  10.     令 sumL = Office.ReadXls(sheet,H,L)
  11.     循环当 sumL 时
  12.         令 sumL = Office.ReadXls(sheet,H,L)
  13.         令 H = H + 1
  14.     循环结束
  15.     令 H = H - 1
  16.     注释:关闭Excel文档工作表
  17.     调用 Office.CloseXls()
  18. 函数结束