VBA常用函数

### VBA常用函数详解 #### 一、字符串处理函数 **Trim(string)**：该函数用于移除字符串两端的空白字符。 - **示例**: `Trim(" Hello ")` 结果为 "Hello"。 **Ltrim(string)**：该函数用于移除字符串左侧的空白字符。 - **示例**: `Ltrim(" Hello ")` 结果为 "Hello "。 **Rtrim(string)**：该函数用于移除字符串右侧的空白字符。 - **示例**: `Rtrim(" Hello ")` 结果为 " Hello"。 **Len(string)**：返回字符串的长度（包括空格）。 - **示例**: `Len("Hello")` 结果为 5。 **Left(string, x)**：从字符串左侧开始截取指定长度 `x` 的子字符串。 - **示例**: `Left("Hello World", 5)` 结果为 "Hello"。 **Right(string, x)**：从字符串右侧开始截取指定长度 `x` 的子字符串。 - **示例**: `Right("Hello World", 5)` 结果为 "World"。 **Mid(string, start, x)**：从字符串 `start` 位置开始截取指定长度 `x` 的子字符串。 - **示例**: `Mid("Hello World", 7, 5)` 结果为 "World"。 **Ucase(string)**：将字符串中的所有字母转换为大写。 - **示例**: `Ucase("Hello World")` 结果为 "HELLO WORLD"。 **Lcase(string)**：将字符串中的所有字母转换为小写。 - **示例**: `Lcase("Hello World")` 结果为 "hello world"。 **Space(x)**：返回包含 `x` 个空格的字符串。 - **示例**: `Space(5)` 结果为 " "。 **Asc(string)**：返回字符串中第一个字符的 ASCII 值。 - **示例**: `Asc("A")` 结果为 65。 **Chr(charcode)**：返回由 `charcode` 指定的 ASCII 字符。 - **示例**: `Chr(65)` 结果为 "A"。 #### 二、类型转换函数 **CBool(expression)**：将表达式转换为 Boolean 类型。 - **示例**: `CBool(1)` 结果为 True。 **CByte(expression)**：将表达式转换为 Byte 类型。 - **示例**: `CByte(100)` 结果为 100。 **CCur(expression)**：将表达式转换为 Currency 类型。 - **示例**: `CCur(100.5)` 结果为 100.5。 **CDate(expression)**：将表达式转换为 Date 类型。 - **示例**: `CDate("2023-01-01")` 结果为 #2023-01-01#。 **CDbl(expression)**：将表达式转换为 Double 类型。 - **示例**: `CDbl(100.5)` 结果为 100.5。 **CDec(expression)**：将表达式转换为 Decimal 类型。 - **示例**: `CDec(100.5)` 结果为 100.5。 **CInt(expression)**：将表达式转换为 Integer 类型。 - **示例**: `CInt(100.5)` 结果为 100。 **CLng(expression)**：将表达式转换为 Long 类型。 - **示例**: `CLng(100.5)` 结果为 100。 **CSng(expression)**：将表达式转换为 Single 类型。 - **示例**: `CSng(100.5)` 结果为 100.5。 **CStr(expression)**：将表达式转换为 String 类型。 - **示例**: `CStr(100)` 结果为 "100"。 **CVar(expression)**：将表达式转换为 Variant 类型。 - **示例**: `CVar(100)` 结果为 100 (Variant 类型)。 **Val(string)**：将字符串转换为数字。 - **示例**: `Val("100")` 结果为 100。 #### 三、日期时间函数 **Now**：返回当前系统日期和时间。 - **示例**: `Now` 返回当前日期和时间。 **Date**：返回当前系统日期。 - **示例**: `Date` 返回当前日期。 **Time**：返回当前系统时间。 - **示例**: `Time` 返回当前时间。 **Timer**：返回自午夜以来经过的秒数。 - **示例**: `Timer` 返回自午夜以来经过的秒数。 **TimeSerial(hour, minute, second)**：返回指定时分秒的时间值。 - **示例**: `TimeSerial(12, 0, 0)` 结果为 12:00:00。 **DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])**：计算两个日期之间的差值，并返回指定间隔单位的值。 - **示例**: `DateDiff("d", #2023-01-01#, #2023-01-02#)` 结果为 1。 **Second(time)**：返回指定时间的秒数（0 至 59）。 - **示例**: `Second(#12:00:30#)` 结果为 30。 **Minute(time)**：返回指定时间的分钟数（0 至 59）。 - **示例**: `Minute(#12:30:00#)` 结果为 30。 **Hour(time)**：返回指定时间的小时数（0 至 23）。 - **示例**: `Hour(#12:30:00#)` 结果为 12。 **Day(date)**：返回指定日期的天数（1 至 31）。 - **示例**: `Day(#2023-01-15#)` 结果为 15。 **Month(date)**：返回指定日期的月份（1 至 12）。 - **示例**: `Month(#2023-01-15#)` 结果为 1。 **Year(date)**：返回指定日期的年份。 - **示例**: `Year(#2023-01-15#)` 结果为 2023。 **Weekday(date[, firstdayofweek])**：返回指定日期的星期几（1 至 7）。 - **示例**: `Weekday(#2023-01-01#)` 结果为 7（表示星期日）。 #### 四、文件操作函数 **Dir[(pathname[, attributes])]**：返回与指定路径和属性匹配的第一个文件名。 - **参数**: - pathname: 文件路径。 - attributes: 文件属性（可选）。 - **示例**: `Dir("C:\Temp\*.txt")` 返回 "C:\Temp" 目录下第一个扩展名为 .txt 的文件名。 **Kill(pathname)**：删除指定路径下的文件。 - **参数**: pathname: 要删除的文件路径。 - **示例**: `Kill("C:\Temp\file.txt")` 删除 "C:\Temp\file.txt" 文件。 **RmDir(pathname)**：删除指定路径下的目录。 - **参数**: pathname: 要删除的目录路径。 - **示例**: `RmDir("C:\Temp\MyFolder")` 删除 "C:\Temp\MyFolder" 目录。 **Open pathname For mode [Access access] [Lock lock] As [#] filenumber [Len = reclength]**：打开或创建一个文件进行输入/输出操作。 - **参数**: - pathname: 文件路径。 - mode: 文件打开模式（如 Input、Output 等）。 - access: 文件访问方式（可选，如 Read、Write 等）。 - lock: 文件锁定方式（可选，如 Shared、Lock 等）。 - filenumber: 文件编号。 - Len: 记录长度（仅在随机访问模式下有效）。 - **示例**: `Open "C:\Temp\test.txt" For Output As #1` 打开 "C:\Temp\test.txt" 文件进行输出操作。 **Close[filenumberlist]**：关闭已打开的文件。 - **参数**: filenumberlist: 要关闭的文件编号列表。 - **示例**: `Close #1` 关闭文件编号为 1 的文件。 **Input#filenumber, varlist**：从文件中读取数据到变量列表。 - **参数**: - filenumber: 文件编号。 - varlist: 变量列表。 - **示例**: `Input #1, var1, var2` 从文件编号为 1 的文件中读取数据到变量 var1 和 var2。 **Write#filenumber, outputlist**：向文件中写入数据。 - **参数**: - filenumber: 文件编号。 - outputlist: 要写入的数据列表。 - **示例**: `Write #1, "Hello", 123` 向文件编号为 1 的文件中写入 "Hello" 和 123。 **Print#filenumber, outputlist**：向文件中写入数据，自动添加换行。 - **参数**: - filenumber: 文件编号。 - outputlist: 要写入的数据列表。 - **示例**: `Print #1, "Hello", 123` 向文件编号为 1 的文件中写入 "Hello" 和 123 并自动换行。 以上这些函数是 VBA 中常用的工具函数，掌握它们可以帮助开发者更加高效地进行程序开发。