VB函数接口

字符串

Len(X)： 计算字符串X的长度
[格式]：
P=Len(X)
[说明]：
空字符串长度为0，空格符也算一个字符，一个中文字虽然占用2 Bytes，但也算一个字符。

[范例]：
(1) 令X=”” (空字符串)
Len(X) 输出结果为0
(2) 令X=”abcd”
Len(X) 输出结果为4
(3) 令X=”VB教程”
Len(X) 输出结果为4 

Mid(X)函数：读取字符串X中间的字符
[格式]：
P=Mid(X,n)
由X的第n个字符读起，读取后面的所有字符。
P=Mid(X,n,m)
由X的第n个字符读起，读取后面的m个字符。

[范例]：
(1) X=”abcdefg”
P=Mid(X,5)
结果为：P=”efg”
(2) X=”abcdefg”
P=Mid(X,2,4)
结果为P=”bcde” 

Replace: 将字符串中的某些特定字符串替换为其他字符串
[格式]：
P=Replace(X,S,R)
[说明]：将字符串X中的字符串S替换为字符串R，然后返回。

[范例]：
X=”VB is very good”
P=Replace(X,good,nice)
输出结果为：P=”VB is very nice” 

StrReverse：反转字符串
[格式]：
P=StrReverse(X)
[说明]：
返回X参数反转后的字符串
[范例]：
（1）X=”abc”
P=StrReverse(X)
输出结果：P=”cba” 

 Ucase(X)，Lcase(X)：转换英文字母的大小写
[格式]：
P=Lcase(X)
‘ 将X字符串中的大写字母转换成小写
P=Ucase(X)
‘ 将X字符串中的小写字母转换成大写
[说明]：除了英文字母外，其他字符或中文字都不会受到影响。

[范例]：
（1） 令 X=”VB and VC”
则Lcase(X)的结果为”vb and vc”，Ucase(X)的结果为”VB AND VC” 

InStr函数：寻找字符串
[格式]：
P=InStr(X,Y)

 

从X第一个字符起找出Y出现的位置
P=InStr(n,X,Y)
从X第n个字符起找出Y出现的位置
[说明]：
（1） 若在X中找到Y，则返回值是Y第一个字符出现在X中的位置。
（2） InStr(X,Y)相当于InStr(1,X,Y)。
（3） 若字符串长度，或X为空字符串，或在X中找不到Y，则都返回0。
（4） 若Y为空字符串，则返回0。

left(字符串,长度) ByVal 从[字符串]的左边开始返回[长度]个字符
例如 Left("小欣无敌,3) 则返回 "小欣无"

right(字符串,长度) ByVal 从[字符串]的右边开始返回[长度]个字符
例如 Right("小欣无敌",3) 则返回 "欣无敌" 

split函数用法

用法：传回数组 = Split(原始字串, 要找的字串, 拆成几个数组) 
描述
返回一个下标从零开始的一维数组，它包含指定数目的子字符串。
语法
Split(expression[, delimiter[, count[, compare]]])

trim函数用法

trim()是去除字符串头或尾部的空格，但不包含中间的空格

数组

LBound函数: 返回一个 Long 型数据，其值为指定数组维可用的最小下标

UBound 函数:
UBound(Arr, 2),二维数组，二级下标对应的最大值
返回一个 Long 型数据，其值为指定的数组维可用的最大下标。

文件

GetAttr(pathname)

必要的 pathname参数是用来指定一个文件名的字符串表达式。pathname可以包含目录或文件夹、以及驱动器。

返回值

由 GetAttr返回的值，是下面这些属性值的总和：

常数	值	描述
vbNormal	0	常规
vbReadOnly	1	只读
vbHidden	2	隐藏
vbSystem	4	系统文件
vbDirectory	16	目录或文件夹
vbArchive	32	上次备份以后，文件已经改变
vbalias	64	指定的文件名是别名。

If GetAttr(Sheet1.Cells(2, 2)  And vbReadOnly）<> 0 Then 判断文件是否是只读属性

字符转换

把文件内容转换成unicode字符，然后，以回车作为分隔符，返回文件内容；

Split(StrConv(InputB(LOF(1), #1), vbUnicode), vbCrLf)