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

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

str
trimset

Возвращает обрезанную строку.

Эта процедура обрезает окружающие символы слева (начало) и справа (конец) исходной строки. Подстроки подходящих trimset будут обрезаны, если указаны, в противном случае будут обрезаны пробелы (ASCII код 32).

Если ключевое слово Any используется, то любой символ соответствующий символу в trimset будет обрезан.

Все сравнения с учетом регистра.

Dim s1 As String = " ... Stuck in the middle ... "
Print "'" + Trim(s1) + "'"
Print "'" + Trim(s1, Any " .") + "'"

Dim s2 As String = "BaaBaaaaB With You aaBBaaBaa"
Print "'" + Trim(s2, "Baa") + "'"
Print "'" + Trim(s2, Any "Ba") + "'"

Вывод:

'... Stuck in the middle ...'
'Stuck in the middle'
'aaB With You aaB'
' With You '		

• DOS версия FreeBASIC не поддерживает Trim , работающую с расширенными символами.
  
  

• Нет в наличии в диалекте -lang qb , но есть псевдоним __Trim.
  
• Суффикс строкового типа "$" не обязателен в диалектах -lang fblite и -lang fb.
  
  

• Новое в FreeBASIC
  
  

• LTrim
  
• RTrim