我给VBA的定义：VBA是个人小型自动化处理的有效工具。利用好了，可以大大提高自己的劳动效率，而且可以提高数据处理的准确度。我推出的VBA系列教程共九套和一部VBA汉英手册，现在已经全部完成，希望大家利用、学习。

如果您只是一般的职场VBA需求，可以打包选择7.1.3.9教程+汉英手册，第7套教程是入门，第1套教程是入门后的提高，第3套教程字典是必备的VBA之精华，第9套教程是实用的典型案例讲解。这四套教程内容掌握后足以处理一般工作中的问题，实际写代码的时候再辅助代码汉英手册，足矣！如果您想进一步提高，就需要选择高级阶段的教程了。

【分享成果，随喜正能量】人性中最大的丑恶，就是喜欢为难他人，尤其是当他手握权力后，会变着法地为难他能够为难的人。。

通常情况下字符串指的是一种数据的类型，在学习教程中我们要注意以下几点：

1 与在双字节字符集 (DBCS) 语言中一样，将 LenB 函数用于字符串中包含的字节数据。 LenB 返回用于表示此字符串的字节的数目，而不是返回字符串中的字符数。在与用户定义类型一起使用时，LenB 将返回内存中大小，包括各个元素之间的任何填充。

2 在与用户定义的数据类型中的可变长度字符串一起使用时，Len 无法确定所需的实际存储字节数。

3 Use the RightB function with byte data contained in a string. Instead of specifying the number of characters to return, length specifies the number of bytes。

4 与在双字节字符集语言中一样，将MidB函数用于字符串中包含的字节数据。参数将指定字节数，而不是指定字符数。有关使用 MidB 的示例代码，请参阅示例：

使用 MidB 和用户定义的函数 (MidMbcs) 返回字符串中的字符。此处的差别在于，输入字符串用 ANSI 表示，而长度用字节表示。

Function MidMbcs(ByVal str as String, start, length)

MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), start, length), vbUnicode)

End Function

Dim MyString

MyString = "AbCdEfG"

' Where "A", "C", "E", and "G" are DBCS and "b", "d",

' and "f" are SBCS.

MyNewString = Mid(MyString, 3, 4)

' Returns "CdEf"

MyNewString = MidB(MyString, 3, 4)

' Returns "bC"

MyNewString = MidMbcs(MyString, 3, 4)

' Returns "bCd"

我20多年的VBA实践经验，全部浓缩在下面的各个教程中：