1）字符串比较比较函数StrComp ()

语法：StrComp (str1 As String , str2 As String [,ampare As Microsoft.VisualBasic.CompareMethod]) As Integer

说明：返回表示str1和str2两个字符串参数比较结果，若str1小于str2，则返回-1；若str1等于str2，返回0；若str1大于str2，若返回1。选择性参数Compare的值有Binary（区分大小写）和Text（不区分大小写）两种，前者为默认值。

（2）筛选字符串数组函数Filter ()

语法：Filter (Source() As {Object | String},match As String [,include As Boolean [,compare As  Microsoft.VisualBasic.CompareMethod ]] As String ()

说明：从一维字符串数组Source ()中筛选包含match字符串的子数组。

若选择性参数include为True（默认），表示从字符串数组Source ()中筛选包含match字符串的子数组；

若选择性参数include为false，表示字符串数组source ()中筛选不包含match字符串的子数组；

选择性参数compare的值有Binary（区分大小定）和Text（不区分大小字）两种，前者为默认值，决定了字符串的比较方式。

例如：Source ()={“abc”,”abdfe”,”ghdf”,”pqs”}，那么filter (Source ,”ab”,True,CompareMethod.Binary)会返回{“abc”,”abdfe”}。

（3）替换字符串函数RePlace ()

语法：RePlace (str As String , find As String , replacement As String [,start As Integer [,count As Integer [,compare As Microsoft.VisualBasic.CompareMethod ]]] As String

说明：将str字符串内的find子字符串替换为replacement子字符串。

选择性参数start表示从str字符串的第start个字符开始查找find子字符串，默认为1；

选择性count表示做几次替换，默认为-1，表示执行所有可能的替换；

选择性参数compare的值有Binary（区分大小定）和Text（不区分大小字）两种，前者为默认值，决定了字符串的比较方式。如：str=”shopping list”那么Relace (str,”o”,”i”)会返回“Shipping list”。

（4）查找字符串函数InStr ()

语法：InStr (start As Integer , str1 As String , str2 As String [,compare As Microsoft.VisualBasic.CompareMethod]) As String

说明：返回str2字符串在str1字符串中第一次出现的位置。

若str1为空字符串（“”）或str2没有出现在str1或start大于str2的长度，就返回0；

若str2为空字符串(“”)，就返回start；

选择性参数compare的值有Binary（区分大小定）和Text（不区分大小字）两种，前者为默认值，决定了字符串的比较方式。如：Instr (3,”Hell Wold”,”o”)返回5。

（5）查找字符串函数Instrrev ()

语法：InStrRev (str1 As String,Str2 As Interger [,start As Integer [,compare As Microsoft.VisualBasic.compareMethod ]]) As Integer

说明：InStrRev ()函数的用途和InsStr ()函数相似，但改从字符串的右边开始检查str2字符串在str1字符中第一次出现的位置。

如：InStrRev (“Hello Word”,”o”)返回3。

（6）将字符串数组组成单一字符串函数Join ()

语法：Join (Source () As {Object | String} [,delimiter As String]) As String

说明：将字符串数组Source ()内的每个字符串组成单一字符串返回，选择性参数delimter表示每个字符之间的分隔符，默认为空字符串（“”）。

如：Source ()={“Janifer”,”Peter”,”Robort”},那么Join (Source)会返回”Janifer Perter Rober”。

（7）将字符串分解成子字符数组函数Split ()

语法：Split (str As String [,delimiter As String [,limit As Integer [,compare As Microsoft.VisualBasic.CompareMethod ]]]) As String

说明：将组成字符串str的每一个字符串放进字符串数组内返回。

选择性参数delimiter表示每个子字符串之间的分隔符，默认值为空字符串（“”）；

参数limit是要返回的子字符串数目，默认为-1，表示返回所有子字符串；

参数compare的值有Binary（区分大小定）和Text（不区分大小字）两种，前者为默认值，决定了字符串的比较方式。

如：str=” I am Happy.”,那么Split (str)会返回字符串数组{“I”,”am”,”Happy”}。

Len Len( string |varname) 返回 字符串 内字符的数目，或是存储一变量所需的字节数。 Trim Trim( string ) 将 字符串 前后的空格去掉 Ltrim Ltrim( string ) 将 字符串 前面的空格去掉 Rtrim Rtrim( string ) 将 字符串 后面的空格去掉 Mid Mid( string ,start,length) 从 string 字符串 的start字符开始取得length长度的 字符串 ，如果省略第三个参数表示从start字符开始到 字符串 结尾的 字符串 Left Left( string ,length) 从 string 字符串 的左边取得length长度的 字符串 Right Right( string ,length) 从 string 字符串 的右边取得length长度的 字符串 LCase LCase( string ) 将 string 字符串 里的所有大写字母转化为小写字母 UCase UCase( string ) 将 string 字符串 里的所有大写字母转化为大写字母 StrComp StrComp( string 1, string 2[，compare]) 返回 string 1 字符串 与 string 2 字符串 的 比较 结果，如果两个 字符串 相同，则返回0，如果小于则返回-1，如果大于则返回1 InStr InStr( string 1, string 2[, compare]) 返回 string 1 字符串 在 string 2 字符串 中第一次出现的位置 Split Split( string 1,delimiter[, count[, start]]) 将 字符串 根据delimiter拆分成一维数组，其中delimiter用于标识子 字符串 界限。如果省略，使用空格("")作为分隔符。 count 返回的子 字符串 数目，-1 指示返回所有子 字符串 。 Split 函数 使你能够将长 字符串 分离为单独的字；但是如果在字与字之间不止一个空格，Split就会返回一个错误的结果。为了防止这种情况发生，你可以在使用Split之前用Replace 函数 来 替换 多个空格的出现。列表A给出了一个例子。... ---------SQL生成----------任务是当用户以逗号来分隔查询的条件，的多条件查询，使用IN(x,y)，但是当在数据库(ACCESS)对应的字段是字符型是就会出现错误，那是当然的！如果是IN(x,y)就没有问题！下面的代码就是对 字符串 的操作，返回 x,y。-----接受要处理的 字符串 -------    Function Tool_disTest(ByVal Tex 同系列的第五篇，上一篇在：http://blog.csdn.net/jiluoxingren/article/details/9633139。讲述如何写SQL语句实现提取表中前n条或前n%的记录，以及讲述使用带有WHERE关键字的SQL：Select语句进行 查找 初步。 Public Function MyInStrRev(MainStr As String , SubStr As String ) As Integer Dim Counter As Integer Dim Success As Boolean If VBA.Len(MainStr) < VBA.Len(SubStr) Then MyInStrRev = 0 For Counter = VBA.Len(SubStr) To VBA.