- 注释:向Excel文档工作表(sheet)单元格(H, L)读出内容存入(sumL)变量
- 注释:Call Plugin.Office.OpenXls("C:\测试.xlsx")
- 注释:L = 1
- 注释:Call Plugin.Office.WriteXls(1, 1, 1, "130")
- 注释:Call ReadXlssum (sumL)
- 函数 ReadXlssum(L)
- 定义变量 sheet, H
- 令 sheet = 1
- 令 H = 1
- 令 sumL = Office.ReadXls(sheet,H,L)
- 循环当 sumL 时
- 令 sumL = Office.ReadXls(sheet,H,L)
- 令 H = H + 1
- 循环结束
- 令 H = H - 1
- 注释:关闭Excel文档工作表
- 调用 Office.CloseXls()
- 函数结束