.版本 2 .支持库 spec .子程序 加密excel, 文本型, , 成功返回空文本，失败错误原因。 .参数 xls, 文本型, , 要加密的excel文件名。全路径 .参数 Password, 文本型, , 要设置的密码 .局部变量 Excel程序对象, 对象 .局部变量 Excel工作簿对象, 对象 .局部变量 Excel工作表对象, 对象 .如果真 (Excel程序对象.创建 (“Excel.Application”, ) ＝ 假) 调试输出 (“创建Excel程序对象失败”) 返回 (Excel程序对象.取错误 ()) .如果真结束 Excel程序对象.写属性 (“Visible”, 假) ' 设置为假不显示excel窗口，设置为真会打开excel。 Excel工作簿对象 ＝ Excel程序对象.读对象型属性 (“Workbooks”, ).对象型方法 (“Open”, xls, , , , ) ' 打开xls文件。 Excel工作簿对象.方法 (“SaveAs”, 取运行目录 () ＋ “\test.xls”, 56, Password) ' 'Excel.Workbook的SaveAs方法的参数说明： ' 参数1、Filename: 可选。该字符串表示要保存的文件名。可包含完整路径。如果不指定路径，Microsoft Excel 将文件保存到当前文件夹中。 ' 参数2、FileFormat: 可选。保存文件时使用的文件格式。 XLS=56 CSV=6 TXT=42 HTML=44 XML=46 PDF=57 XPS=58 ' 参数3、Password :Variant 类型，可选。它是一个区分大小写的字符串（最长不超过 15 个字符），用于指定文件的保护密码。 ' 参数4、WriteResPassword :Variant 类型，可选。 该字符串表示文件的写保护密码。如果文件保存时带有密码，但打开文件时不输入密码，则该文件以只读方式打开。 ' 参数5、ReadOnlyRecommended : Variant 类型，可选。如果该值为 True，则在打开文件时显示一条信息，提示该文件以只读方式打开。 ' 参数6、CreateBackup: Variant 类型，可选。如果该值为 True，则创建备份文件。 ' 更多参数请自行百度。 Excel工作簿对象.写属性 (“Saved”, 真) Excel程序对象.方法 (“Close”, ) Excel程序对象.方法 (“Quit”, ) ' 退出EXCEL程序 Excel工作表对象.清除 () ' 清空对象 Excel工作簿对象.清除 () ' 清空对象 Excel程序对象.清除 () ' 清空对象 返回 (“”)