【vbs基础代码大全】VBScript（Visual Basic Script）是一种轻量级的脚本语言，常用于Windows系统中的自动化任务、网页脚本以及简单的数据处理。虽然它在现代开发中已逐渐被其他语言取代，但在一些旧系统或特定场景下仍然有其应用价值。以下是对VBScript基础知识的总结，并附上常用代码示例表格。
一、VBS基础代码总结
1. 变量声明与赋值
VBScript不区分变量类型，使用`Dim`关键字声明变量，赋值使用等号`=`。
2. 基本数据类型
包括字符串、数字、布尔值、日期、对象等，其中字符串和数字是最常用的。
3. 条件语句
使用`If...Then...Else`结构进行逻辑判断。
4. 循环语句
支持`For...Next`、`Do...Loop`、`While...Wend`等多种循环方式。
5. 函数与过程
可以通过`Function`和`Sub`定义自定义函数和过程。
6. 数组操作
使用`Dim arr(5)`声明数组，支持一维和多维数组。
7. 文件操作
通过`FileSystemObject`实现对文件的读写、创建、删除等操作。
8. 消息框与输入框
使用`MsgBox`显示信息，`InputBox`获取用户输入。
9. 错误处理
使用`On Error Resume Next`和`Err.Number`进行异常捕获。
10. 对象模型
VBScript可以调用COM对象，如`CreateObject("WScript.Shell")`等。
二、常用VBS代码示例表
| 功能 | 代码示例 | 说明 |
| 显示消息框 | `MsgBox "Hello, World!"` | 弹出一个带“确定”按钮的消息框 |
| 获取用户输入 | `input = InputBox("请输入您的名字：")` | 弹出输入框，获取用户输入 |
| 变量声明与赋值 | `Dim name: name = "John"` | 声明并赋值变量 |
| 条件判断 | `If 10 > 5 Then MsgBox "True" Else MsgBox "False"` | 判断条件是否成立 |
| 循环输出 | `For i = 1 To 5: MsgBox i: Next` | 输出1到5的数字 |
| 函数定义 | `Function Add(a, b): Add = a + b: End Function` | 定义加法函数 |
| 数组操作 | `Dim arr(2): arr(0) = "A": arr(1) = "B": MsgBox arr(1)` | 声明并访问数组元素 |
| 文件读取 | `Set fso = CreateObject("Scripting.FileSystemObject"): Set file = fso.OpenTextFile("test.txt", 1): MsgBox file.ReadAll` | 读取文本文件内容 |
| 创建文件 | `Set file = fso.CreateTextFile("newfile.txt", True): file.WriteLine "这是新内容": file.Close` | 创建并写入文本文件 |
| 调用系统命令 | `Set shell = CreateObject("WScript.Shell"): shell.Run "notepad.exe"` | 打开记事本程序 |
三、注意事项
- VBScript是基于事件驱动的，通常需要通过`.vbs`文件运行。
- 不支持面向对象编程，但可以通过对象模型实现部分功能。
- 在Windows环境中兼容性较好，但在其他平台（如Linux）需借助兼容工具。
- 由于安全性问题，部分浏览器已禁用VBScript。
四、总结
VBScript虽不是现代主流编程语言，但在特定环境下仍具有实用价值。掌握其基础语法和常用功能，有助于快速完成系统自动化任务。本文通过总结与表格形式，提供了VBScript的基础代码参考，便于初学者快速入门与实际应用。
