VB.NET 文字列の先頭と末尾の空白を取り除く(Trim)

nas2020/08/01

VB.NETのTrim/Replaceメソッドで文字列の先頭と末尾の空白を取り除くサンプルです。

目次

サンプル 先頭と末尾の空白を取り除く(Trim)
  先頭の空白を取り除く(TrimStart)
  末尾の空白を取り除く(TrimEnd)
  先頭と末尾の特定の文字を取り除く(Trim)
  文字列の中にある半角空白も取り除く(Replace)

先頭と末尾の空白を取り除く(Trim)

Public Function Trim() As [String]
  • 文字列の先頭と末尾の半角空白と全角空白を取り除きます。
  • 空白が複数の場合、複数の空白を取り除きます。
  • 先頭と末尾以外にある空白は取り除きません。

文字列の先頭と末尾の空白を取り除くサンプルです。
コード中のコメントにある△は半角空白で□は全角を表しています。

Module Module1
	Sub Main()

		'半角空白あり(△あいう△+1△△)
		Dim str1 As String = " あいう +1  "
		Console.WriteLine(str1.Trim()) 'あいう +1

		'全角空白あり(□あいう△+1□)		
		Dim str2 As String = "　あいう +1　"
		Console.WriteLine(str2.Trim()) 'あいう +1

	End Sub
End Module

6行目は、trimメソッドで先頭の半角空白と末尾の連続した半角空白を取り除いています。
文字列の中にある空白は削除しません。
10行目は、先頭と末尾の全角空白を取り除いています。

 

先頭の空白を取り除く(TrimStart)

Public Function TrimStart(ParamArray trimChars() As Char) As [String]

TrimStartは、文字列の先頭の空白を取り除きます。

Module Module1
	Sub Main()

		'半角空白あり(△あいう△+1△△)
		Dim str1 As String = " あいう +1  "
		Console.WriteLine(str1.TrimStart()) 'あいう +1△△

		'全角空白あり(□あいう△+1□)		
		Dim str2 As String = "　あいう +1　"
		Console.WriteLine(str2.Trimstart()) 'あいう +1□

	End Sub
End Module

 

末尾の空白を取り除く(TrimEnd)

Public Function TrimEnd(ParamArray trimChars() As Char) As [String]

TrimEndは、文字列の末尾の空白を取り除きます。

Module Module1
	Sub Main()

		'半角空白あり(△あいう△+1△△)
		Dim str1 As String = " あいう +1  "
		Console.WriteLine(str1.TrimEnd()) '△あいう +1

		'全角空白あり(□あいう△+1□)		
		Dim str2 As String = "　あいう +1　"
		Console.WriteLine(str2.TrimEnd()) '□あいう +1

	End Sub
End Module

 

先頭と末尾の特定の文字を取り除く(Trim)

Public Function Trim(ParamArray trimChars() As Char) As [String]

先頭と末尾の特定の文字を取り除くサンプルです。

Module Module1
	Sub Main()

		Dim arr1() As Char = {"1", "2", "3"}

		' 先頭と末尾の1,2,3を取り除く
		Dim str1 As String = "123あいう +1123"
		Console.WriteLine(str1.Trim(arr1)) 'あいう +

	End Sub
End Module

4行目は、Char型の配列です。
8行目は、Trimメソッドの引数が配列です。指定した文字の1と2と3が削除されます。

以下はMicroSoftのTrimメソッドのリンクです。
https://docs.microsoft.com/ja-jp/dotnet/api/system.string.trim?view=netcore-3.1

文字列の中にある半角空白も取り除く(replace)

Public Function Replace(oldValue As [String], newValue As [String]) As [String]
  • 指定した1文字を別の1文字に置換します。

文字列の中にある半角空白も取り除くサンプルです。

Module Module1
	Sub Main()

		'半角空白あり(△あ△い△う△ +1△△)
		Dim str1 As String = " あ い う +1  "
		Console.WriteLine(str1.Replace(" ", "")) 'あいう+1

	End Sub
End Module

6行目は、Replaceメソッドで、文字列の中の空白も取り除いています。

以下はMicroSoftのreplaceメソッドのリンクです
https://docs.microsoft.com/ja-jp/dotnet/api/system.string.replace?view=netframework-4.7.2

関連の記事

VB.NET Replace 文字列を置き換えるサンプル

△上に戻る