RTrim
 
删除字符串右侧的周围的子字符串或字符

语法

Declare Function RTrim Overload ( ByRef str As Const String, [ Any ] ByRef trimset As Const String = " " ) As String
Declare Function RTrim ( ByRef str As Const WString, [ Any ] ByRef trimset As Const WString = WStr(" ") ) As WString

用法

result = RTrim[$]( str [, [ Any ] trimset ] )

参数

str
源字符串。
trimset
要修剪的子字符串。

返回值

返回修剪的字符串。

说明

此过程从源字符串的右侧(末尾)修剪周围的字符。如果指定了匹配trimset 的子字符串将被修剪,否则将修剪空格(ASCII代码32)。

如果使用Any关键字,则会修剪trimset 中匹配字符的任何字符。

所有比较都是区分大小写的。

例子

Dim s1 As String = "第一百零一条"
Print "'" + RTrim(s1) + "'"
Print "'" + RTrim(s1, "01") + "'"
Print "'" + RTrim(s1, Any "10") + "'"

Dim s2 As String = "测试模式aaBBaaBaa"
Print "'" + RTrim(s2, "酒吧") + "'"
Print "'" + RTrim(s2, Any "Ba") + "'"


将产生输出:

'Article 101'
'Article 101  '
'Article'
'Test Pattern aaB'
'Test Pattern '

平台差异

  • FreeBASIC的DOS版本/目标不支持宽字符版本的RTrim.

方言差异

  • -lang qb 方言中的字符串类型后缀“$”是必须的。
  • 字符串类型后缀“$”在-lang fblite -lang fb 方言中是可选的。

与QB差别

  • QB不支持指定trimset 字符串或ANY 子句。

参考