在文本框中如何过滤空格键!
在文本框中如何过滤空格键请群众踊跃发言!
返回 Variant (String),其中包含指定字符串的拷贝,没有前导空白 (LTrim)、尾随空白 (RTrim) 或前导和尾随空白 (Trim)。
语法
LTrim(string)
RTrim(string)
Trim(string)
必要的 string 参数可以是任何有效的字符串表达式。如果 string 包含 Null,将返回 Null。
本示例使用 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->"
。
[此贴子已经被作者于2005-4-12 13:48:41编辑过]