标题《VBS调用Windows API函数的代码》和描述内容提示我们，本文将探讨如何使用VBScript（VBS）来调用Windows应用程序接口（API），并将鼠标移动到桌面左上角。文中提到了通过阅读两篇文章并结合其内容编写的示例程序，说明了从WinCC VBS利用EXCEL调用Windows API函数的思路出发。尽管WinCC与西门子自动化有关联，但作者强调主要探讨的是通过Excel VBA调用Windows API的思路。文章还提到了对Excel安全设置的修改，以便VBS能够完全控制Excel，以及如何在VBS中创建并运行包含VBA代码的Excel文档。下面将详细展开这些知识点。
### 1. VBScript简介
VBScript是微软公司推出的一种脚本语言，它是Visual Basic的一个简化的版本，通常用于Windows环境下的客户端脚本编写。由于其简单的语法和易用性，VBScript常用于小型应用程序、自动化任务和网页中嵌入简单的脚本。
### 2. Windows API概念
Windows API（Application Programming Interface，应用程序编程接口）是一套可以进行系统级编程调用的函数集合，它允许开发者通过调用这些函数来控制Windows操作系统及运行于其上的应用程序。通过API，可以实现诸如创建窗口、管理内存、操纵文件和目录、以及控制硬件等系统级操作。
### 3. Excel VBA的作用
Excel VBA（Visual Basic for Applications）是嵌入在Microsoft Excel中的编程语言。VBA通过一系列预定义的函数和对象模型，使得开发者能够对Excel文档进行自动化操作，编写宏来实现复杂的数据处理和界面控制。VBA同样能够调用Windows API，这意味着可以通过Excel VBA来访问底层Windows功能。
### 4. VBS通过Excel VBA调用Windows API
在VBS中调用Windows API，常规方法可能需要直接在VBS中声明并调用API函数。但文中提出了一个创新思路，即通过VBS创建一个Excel对象，然后在Excel中嵌入VBA代码。这段VBA代码包含对Windows API函数的声明和调用，实现特定的功能——本例中即移动鼠标到桌面左上角。
### 5. 示例代码解释
- `Dim WshShell` 和 `set WshShell=CreateObject("wscript.Shell")`：这两行代码用于创建一个WScript.Shell对象，它允许VBS脚本与Windows Shell进行交互。
- `WshShell.RegWrite`：通过调用注册表写入函数，修改注册表项值，目的是为了绕过Excel的安全限制，允许VBS完全控制Excel对象模型。
- `Dim oExcel, oBook, oModule`：声明变量，用于存储即将创建的Excel应用程序实例、工作簿和模块。
- `Set oExcel = CreateObject("excel.application")`：创建Excel应用程序实例。
- `Set oBook = oExcel.Workbooks.Add` 和 `Set oModule = oBook.VBProject.VBComponents.Add(1)`：向Excel应用程序中添加一个新的工作簿和一个VB项目组件（模块）。
- `strCode`：一个字符串变量，包含VBA代码，这里声明了一个Windows API函数SetCursorPos，并定义了一个宏MyMacro，用于设置鼠标位置。
- `oModule.CodeModule.AddFromString strCode`：将包含Windows API调用的VBA代码添加到新创建的模块中。
- `oExcel.Run "MyMacro", 0, 0`：执行VBA宏MyMacro。
- `oExcel.DisplayAlerts = False`：关闭Excel的警告信息显示。
- `oBook.Close` 和 `oExcel.Quit`：关闭工作簿并退出Excel应用程序。
### 6. 注意事项
- 确保Excel没有被设置为太强的安全限制，否则可能无法成功创建和操作对象。
- 需要确保Excel版本与注册表路径中的版本相匹配。
- 在使用注册表操作时要小心，错误的修改可能导致系统不稳定或无法正常运行。
通过上述知识点的介绍，我们可以看到VBS和Windows API的结合使用，通过Excel VBA作为桥梁，实现复杂功能的自动化操作。这种方法虽然绕道，但为VBS提供了更多的灵活性和控制能力。需要注意的是，本文所涉及的注册表修改和VBA代码的使用应该在了解相应风险的基础上进行。
