RTRIM
- 来源: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgRtrim
- 最后更新: 2026-02-12
删除字符串右侧的周围子字符串或字符
语法
vb
declare function Rtrim ( 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中任意字符匹配的所有字符。
所有比较均区分大小写。
示例
start GeSHi
vb
Dim s1 As String = "Article 101 "
Print "'" + RTrim(s1) + "'"
Print "'" + RTrim(s1, " 01") + "'"
Print "'" + RTrim(s1, Any " 10") + "'"
Dim s2 As String = "Test Pattern aaBBaaBaa"
Print "'" + RTrim(s2, "Baa") + "'"
Print "'" + RTrim(s2, Any "Ba") + "'"end GeSHi
将产生如下输出:
'Article 101'
'Article 101 '
'Article'
'Test Pattern aaB'
'Test Pattern '平台差异
- FreeBASIC 的 DOS 版本/目标不支持
RTrim的宽字符版本。
方言差异
- 在 -lang qb 方言中需要字符串类型后缀 "$"。
- 在 -lang fblite 方言中字符串类型后缀 "$" 是可选的。
- 在 -lang fb 方言中字符串类型后缀 "$" 被忽略,仅在使用 -w suffix 编译选项(或 -w pedantic 编译选项)时才会警告。
与QB的区别
- QB 不支持指定
trimset字符串或ANY子句。
参见
LtrimTrim
返回 目录