【vbs实用代码】VBScript（VBS）是一种轻量级的脚本语言，常用于Windows系统中的自动化任务。虽然随着PowerShell的普及，VBS的使用逐渐减少，但在一些旧系统或特定场景中，它仍然有其独特的价值。以下是一些VBS实用代码的总结，帮助用户快速掌握常用功能。
一、VBS实用代码总结
| 功能 | 示例代码 | 说明 |
| 显示消息框 | `MsgBox "Hello, World!"` | 弹出一个简单的消息框，显示指定内容 |
| 获取用户输入 | `Input = InputBox("请输入您的名字：")` | 弹出输入框，获取用户输入的内容 |
| 创建文本文件 | ```Set fso = CreateObject("Scripting.FileSystemObject") Set file = fso.CreateTextFile("test.txt", True) file.WriteLine("这是写入的内容") file.Close``` | 使用FileSystemObject创建并写入文本文件 |
| 读取文本文件 | ```Set fso = CreateObject("Scripting.FileSystemObject") Set file = fso.OpenTextFile("test.txt", 1) content = file.ReadAll file.Close MsgBox content``` | 读取文本文件内容并显示 |
| 执行命令行程序 | `CreateObject("WScript.Shell").Run "notepad.exe"` | 调用系统命令运行记事本或其他程序 |
| 弹出确认对话框 | `If MsgBox("您确定要继续吗？", vbYesNo) = vbYes Then MsgBox "已确认" Else MsgBox "已取消"` | 提供“是”或“否”的选择，并根据结果执行不同操作 |
| 获取当前时间 | `MsgBox Now` | 显示当前日期和时间 |
| 等待指定时间 | `WScript.Sleep 5000` | 暂停脚本执行5秒 |
| 自动关闭窗口 | `WScript.Quit` | 结束当前脚本的执行 |
二、使用建议
- 兼容性：VBS在Windows系统中广泛支持，但不适用于其他操作系统。
- 安全性：由于VBS可以执行系统命令，因此需注意脚本来源，避免运行不可信的脚本。
- 替代方案：对于更复杂的任务，建议使用PowerShell或Python等现代脚本语言。
三、总结
VBS虽不是最强大的脚本语言，但在某些特定场景下仍具有实用价值。通过上述代码示例，可以快速实现基本的自动化操作。如果你正在维护旧系统或需要简单完成某些任务，VBS仍然是一个值得学习的工具。
