VBA函数精选之二十七（LTrim、RTrim与 Trim 函数）

蓝桥玄霜

第1.27例    LTrim、RTrim与 Trim 函数
一、题目：
要求编写一段代码，分别运用这三个函数来返回没有前导空白 (LTrim)、尾随空白 (RTrim) 或前导和尾随空白 (Trim)的指定字符串。
二、代码：
Sub 示例_1_027()
         Dim ZDzfc$, CJzfc$
         ZDzfc = "  <-裁剪字符串->  "    ' 设置字符串初值。
     CJzfc = LTrim(ZDzfc)    '返回 "<-裁剪字符串-> "。
     CJzfc = RTrim(ZDzfc)    '返回 " <-裁剪字符串->"。
     CJzfc = Trim(ZDzfc)    '返回 "<-裁剪字符串->"。
End Sub
三、代码详解
1、Sub 示例_1_027()：宏程序的开始语句。宏名为示例_1_027。
2、Dim  ZDzfc$, CJzfc$  ：声明 RYzfc、CJzfc为字符串变量。
3、ZDzfc = "  <-裁剪字符串->  "    ：把指定的字符串赋给字符串变量ZDzfc。
4、CJzfc = LTrim(ZDzfc) ：   运用LTrim 函数裁去左边的空白，把结果赋给变量CJzfc,返回 "<-裁剪字符串-> "。
5、CJzfc = RTrim(ZDzfc) ：   运用RTrim 函数裁去右边的空白，把结果赋给变量CJzfc,返回 " <-裁剪字符串->"。
6、CJzfc = Trim(ZDzfc) ：   运用Trim 函数裁去左右两边的空白，把结果赋给变量CJzfc,返回 "<-裁剪字符串->"。

LTrim、RTrim与 Trim 函数
返回 Variant (String)，其中包含指定字符串的拷贝，没有前导空白 (LTrim)、尾随空白 (RTrim) 或前导和尾随空白 (Trim)。

LTrim(string)
RTrim(string)
Trim(string)

必要的 string 参数可以是任何有效的字符串表达式。如果 string 包含 Null，将返回 Null。

VBA函数精选之二十六（Len 函数）：http://club.excelhome.net/viewth ... e%3D1&frombbs=1

zxd_little

继续学习中，感谢

龙城飞将III

赞蓝神，第27个函数学习完毕，mark一下！

陈功

学习中，感谢

乾坤若木

谢谢楼主分享！学习！

妖精的眼泪

trim裁剪后数据为啥为啥粘贴数值后还是带空字符串，和没裁剪一样，求教