一个小问题，高分求解(几个小函数的用法)。——80分，绝对值的看一进

Question

Split函数
      描述返回一个下标从零开始的一维数组，它包含指定数目的子字符串。语法Split(expression[, delimiter[, count[, compare]]])Split函数语法有如下几部分：部分 描述 
expression 必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串("")，Split则返回一个空数组，即没有元素和数据的数组。 
delimiter 可选的。用于标识子字符串边界的字符串字符。如果忽略，则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串，则返回的数组仅包含一个元素，即完整的 expression字符串。 
count 可选的。要返回的子字符串数，–1表示返回所有的子字符串。 
compare 可选的。数字值，表示判别子字符串时使用的比较方式。关于其值，请参阅“设置值”部分。 
设置值compare参数的设置值如下：常数 值 描述 
vbUseCompareOption –1 用Option Compare语句中的设置值执行比较。 
vbBinaryCompare 0 执行二进制比较。 
vbTextCompare 1 执行文字比较。 
vbDatabaseCompare 2 仅用于Microsoft Access。基于您的数据库的信息执行比较。

Answer 1

UCase 函数
      返回 Variant (String)，其中包含转成大写的字符串。语法UCase(string)必要的 string 参数为任何有效的字符串表达式。如果 string 包含 Null，将返回 Null。说明只有小写的字母会转成大写；原本大写或非字母之字符保持不变。
UCase 函数示例
本示例使用 UCase 函数来将某字符串转成全部大写。Dim LowerCase, UpperCase
LowerCase = "Hello World 1234"   ' 要输送的字符串。
UpperCase = UCase(LowerCase)   ' 返回 "HELLO WORLD 1234"。 
LTrim、RTrim与 Trim 函数
      返回 Variant (String)，其中包含指定字符串的拷贝，没有前导空白 (LTrim)、尾随空白 (RTrim) 或前导和尾随空白 (Trim)。语法LTrim(string)RTrim(string)Trim(string)必要的 string 参数可以是任何有效的字符串表达式。如果 string 包含 Null，将返回 Null。
LTrim，RTrim，及 Trim 函数示例
本示例使用 LTrim 及 RTrim 函数将某字符串的开头及结尾的空格全部去除。事实上只使用 Trim 函数也可以做到将两头空格全部去除。Dim MyString, TrimString
MyString = "  <-Trim->  "   ' 设置字符串初值。
TrimString = LTrim(MyString)   ' TrimString = "<-Trim->  "。
TrimString = RTrim(MyString)   ' TrimString = "  <-Trim->"。
TrimString = LTrim(RTrim(MyString))   ' TrimString = "<-Trim->"。
' 只使用 Trim 函数也同样将两头空格去除。
TrimString = Trim(MyString)   ' TrimString = "<-Trim->"。

Answer 2

Trim$()与Trim()的区别仅在于一个返回String、一个返回Variant由于String运算比Variant运算快
所以Trim$()比Trim()快