<< 前へ        次へ >>

ID : 4554

RTrim

機能

文字列の末尾のスペースを削除します。

構文

RTrim(文字列)

指定項目

文字列
文字列型データを指定します。

戻り値

文字列の末尾側のスペースを削除した文字列型データを返します。

解説

指定した文字列の末尾側の全てのスペース等を削除して返します。

削除するキャラクタ 文字コード
スペース(1バイト) Chr(32)
スペース(2バイト) 全角スペースの文字コード
(文字コードの種類によっては削除されない場合があります。)
タブ Chr(9)
ラインフィード文字 Chr(10)
キャリッジリターン Chr(13)

関連項目

-

注意事項

-

用例

'!TITLE "文字列の末尾のスペースを削除"
' 文字列の末尾のスペースを削除した文字列をメッセージ出力ウィンドウに表示
Sub Sample_RTrim

  Dim aaa As String
  Dim bbb As String
  Dim ccc As String
  Dim ddd as String

  ' 末尾に半角スペースを1つ入力した文字列"Denso Corporation "をaaaに代入
  aaa = "Denso Corporation "

  ' メッセージ出力ウィンドウに"Denso Corporation"を表示
  PrintDbg aaa 

  ' 末尾にタブを１つ入力した文字列"Denso Corporation  "をbbbに代入
  bbb = "Denso Corporation  "

  ' メッセージ出力ウィンドウに"Denso Corporation  "を表示
  PrintDbg bbb 

  ' aaaの文字列の末尾からスペースを削除した文字列をcccに代入
  ccc = RTrim( aaa )

  ' bbbの文字列の末尾からスペースを削除した文字列をdddに代入
  ddd = RTrim( bbb )

  ' メッセージ出力ウィンドウに"Denso Corporation"を表示
  PrintDbg ccc

  ' メッセージ出力ウィンドウに"Denso Corporation"を表示
  PrintDbg ddd

End Sub

ID : 4554

<< 前へ        次へ >>