VBレスキュー(花ちゃん)
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ各掲示板

メニューへ戻ります。 関数・メソッド・変数関係のメニュー
１．数学関数・三角関数の紹介
２．主要データ型等の変換関数等の紹介
３．Convert クラスのメソッドでのデータ型変換関数等の紹介
４．Microsoft.VisualBasic 名前空間の主要文字列関数の紹介　
５．System.String クラスの主要文字列関数の紹介
６．条件判断等を行う関数の紹介
７．日付・時刻に関する主要関数の紹介(Microsoft.VisualBasic名前空間)
８．日付・時刻に関する System 名前空間のメソッド等の紹介
９．その他の主要関数(メソッド)等の紹介　
10．
11．
12．
．
20．その他、当サイト内に掲載の関数・メソッド・変数に関するサンプル


５．System.String クラスの主要文字列関数の紹介(11_Fnc_05)　(旧、SampleNo.005)
１ ．Chars プロパティの使用例(現在の String オブジェクト内の指定した位置にある Char オブジェクトを取得する)
２ ．Compare メソッドの使用例(2つの String を比較し並べ替え順序におけるそれらの相対位置を示す)
３ ．Concat メソッドの使用例(1つ以上のインスタンスまたは Object のインスタンスの String を連結する)
４ ．Copy メソッドの使用例(指定した String と同じ値を使用して、String の新しいインスタンスを作成する)
５ ．EndsWith メソッドの使用例(このインスタンスの末尾が指定した String と一致するかどうかを判断する)
６ ．Format メソッドの使用例(指定した文字列の各書式項目を対応するオブジェクトの値と等価のテキストに置換る)
７ ．IndexOf メソッドの使用例(指定した文字列が現在の String 内で最初に見つかった位置を返す)
８ ．IndexOfAny メソッドの使用例(指定の文字列中に指定した配列内にある文字が最初に見つかった位置を返す)
９ ．Insert メソッドの使用例(指定の文字列内の指定したインデックス位置に指定した文字列を挿入する)
10．Join メソッドの使用例(指定した配列の要素またはコレクションのメンバーを連結する)
11．LastIndexOf メソッドの使用例(指定の文字列内で最後に出現する指定された文字列のインデックス位置を返す)
12．Length メソッドの使用例(現在の String オブジェクト内の文字数を取得する)
13．Remove メソッドの使用例(指定の文字列から指定された文字数を削除した文字列を返す)
14．Replace メソッドの使用例(現在の文字列に出現する指定した文字列をすべて別に指定した文字列に置換る)
15．Split メソッドの使用例(指定された文字の配列の要素で区切られた部分文字列を格納する文字列配列を返す)
16．StartsWith メソッドの使用例(指定の文字列の先頭が指定した文字列と一致するかどうかを判断する)
17．String コンストラクターの使用例(String クラスの新しいインスタンスを初期化する)
18．Substring メソッドの使用例(インスタンスから部分文字列を取得する)
19．ToCharArray メソッドの使用例(このインスタンスの文字を文字配列へコピーする)
20．ToLower メソッドの使用例(指定の文字列のコピーを小文字に変換して返す)
21．ToUpper メソッドの使用例(指定の文字列のコピーを大文字に変換して返す)
22．Trim メソッドの使用例(指定の文字列の先頭および末尾から指定した文字をすべて削除した文字列を返す)
23．TrimEnd メソッドの使用例(指定の文字列の末尾から指定した文字をすべて削除した文字列を返す)
24．TrimStart メソッドの使用例(指定の文字列の先頭から指定した文字をすべて削除した文字列を返す)
25．
26．

実使用例としては適切でない使用例も含まれているかも知れませんがご了承願います。
また、使用例以外にも引数が色々用意されていますので、詳しくは、MSDN や WEB 上で調べて下さい。
　下記プログラムコードに関する補足・注意事項　
動作確認：Windows 8.1 (Windows 7) / VB2013 (VB2010) / Framework 4.5.1 / 対象の CPU：x86
Option　：[Compare Text] [Explicit On] [Infer On] [Strict On]
Imports ：追加なし
参照設定：追加なし
その他　：Button1
　　　　：
このサンプル等の内容を無断で転載、掲載、配布する事はお断りします。(私の修正・改訂・削除等が及ばなくなるので)
必要ならリンクをはるようにして下さい。(引用の場合は引用元のリンクを明記して下さい)
このページのトップへ移動します。 １．Chars プロパティの使用例(現在の String オブジェクト内の指定した位置にある Char オブジェクトを取得する)
[名前空間: System]
String.Chars プロパティ = 現在の String オブジェクト内の指定した位置にある Char オブジェクトを取得します。

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim s1 As String = "ABCあいう"
    Console.WriteLine("s1.Chars(0) = {0}", s1.Chars(0))
    Console.WriteLine("s1.Chars(2) = {0}", s1.Chars(2))
    Console.WriteLine("s1.Chars(4) = {0}", s1.Chars(4))

    TextBox1.Text = "01．String.Chars プロパティ = 現在の String オブジェクト内の指定した位置にある" _
                                                    & " Char オブジェクトを取得します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim s1 As String = ""ABCあいう""" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("s1.Chars(0) = {0}", s1.Chars(0)) & vbCrLf
    TextBox1.Text &= String.Format("s1.Chars(2) = {0}", s1.Chars(2)) & vbCrLf
    TextBox1.Text &= String.Format("s1.Chars(4) = {0}", s1.Chars(4)) & vbCrLf
End Sub

上記実行結果
01．String.Chars プロパティ = 現在の String オブジェクト内の指定した位置にある Char オブジェクトを取得します。

Dim s1 As String = "ABCあいう"

s1.Chars(0) = A
s1.Chars(2) = C
s1.Chars(4) = い
このページのトップへ移動します。 ２．Compare メソッドの使用例(2つの String を比較し並べ替え順序におけるそれらの相対位置を示す)
[名前空間: System]
String.Compare メソッド = 指定した 2 つの String オブジェクトを比較し、並べ替え順序におけるそれらの相対位置を示す整数を返す。
Microsoft.VisualBasic.Strings.StrComp メソッドの使用例も参照願います。
又、String.CompareOrdinal メソッドについても調べて見て下さい。

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    Console.WriteLine("Compare(""abcd"", ""ABCD"", CurrentCultureIgnoreCase) = {0}", _
                                String.Compare("abcd", "ABCD", StringComparison.CurrentCultureIgnoreCase))
    Console.WriteLine("Compare(""abcd"", ""ABCD"", CurrentCulture) = {0}", _
                                String.Compare("abcd", "ABCD", StringComparison.CurrentCulture))
    Console.WriteLine("Compare(""A"", ""B"", CurrentCulture) = {0}", _
                                                    String.Compare("A", "B", StringComparison.CurrentCulture))
    Console.WriteLine("Compare(""B"", ""A"", CurrentCulture) = {0}", _
                                                    String.Compare("B", "A", StringComparison.CurrentCulture))

    TextBox1.Text = "02．String.Compare メソッド = 指定した 2 つの String オブジェクトを比較し、" _
                                       & "並べ替え順序におけるそれらの相対位置を示す整数を返す。" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("Compare(""abcd"", ""ABCD"", CurrentCultureIgnoreCase) = {0}", _
                                String.Compare("abcd", "ABCD", StringComparison.CurrentCultureIgnoreCase)) & vbCrLf
    TextBox1.Text &= String.Format("Compare(""abcd"", ""ABCD"", CurrentCulture) = {0}", _
                                            String.Compare("abcd", "ABCD", StringComparison.CurrentCulture)) & vbCrLf
    TextBox1.Text &= String.Format("Compare(""A"", ""B"", CurrentCulture) = {0}", _
                                                    String.Compare("A", "B", StringComparison.CurrentCulture)) & vbCrLf
    TextBox1.Text &= String.Format("Compare(""B"", ""A"", CurrentCulture) = {0}", _
                                                    String.Compare("B", "A", StringComparison.CurrentCulture)) & vbCrLf
End Sub

上記実行結果
02．String.Compare メソッド = 指定した 2 つの String オブジェクトを比較し、並べ替え順序におけるそれらの相対位置を示す整数を返す。

Compare("abcd", "ABCD", CurrentCultureIgnoreCase) = 0
Compare("abcd", "ABCD", CurrentCulture) 　　　　　= -1
Compare("A", "B", CurrentCulture) 　　　　　　　　= -1
Compare("B", "A", CurrentCulture) 　　　　　　　　= 1

CurrentCulture　　　　　　 カルチャに依存した並べ替え規則および現在のカルチャを使用して文字列を比較します。
CurrentCultureIgnoreCase　 カルチャに依存した並べ替え規則と現在のカルチャを使用し、比較する文字列の
　　　　　　　　　　　　　　大文字と小文字を区別しないで文字列を比較します。
InvariantCulture　　　　　 カルチャに依存した並べ替え規則とインバリアントカルチャを使用して文字列を比較します。
InvariantCultureIgnoreCase カルチャに依存した並べ替え規則とインバリアントカルチャを使用し、比較する文字列の
　　　　　　　　　　　　　　大文字と小文字を区別しないで文字列を比較します。
Ordinal　　　　　　　　　　序数の並べ替え規則を使用して文字列を比較します。
OrdinalIgnoreCase　　　　　序数の並べ替え規則を使用し、文字列の大文字と小文字を区別しないで文字列を比較します。
このページのトップへ移動します。 ３．Concat メソッドの使用例(1つ以上のインスタンスまたは Object のインスタンスの String を連結する)
[名前空間: System]
String.Concat メソッド = String の1つ以上のインスタンス、又は Object の1つ以上のインスタンスの String 形式の値を連結します。
(引数が色々用意されていますので、詳しい使用方法は、MSDN 等を参照願います。)

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
    Dim strA As String = "C:\"
    Dim strB As String = "my Documents\"
    Dim strC As String = "Test.txt"
    Console.WriteLine("String.Concat(strA, strB, strC) = {0}", String.Concat(strA, strB, strC))

    TextBox1.Text = "03．String.Concat メソッド = String の1つ以上のインスタンス、" _
                        & "又は Object の1つ以上のインスタンスの String 形式の値を連結します。" & vbCrLf
    TextBox1.Text &= "    (引数が色々用意されていますので、詳しい使用方法は、MSDN 等を参照願います。)" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim strA As String = ""C:\""" & vbCrLf
    TextBox1.Text &= "Dim strB As String = ""my Documents\""" & vbCrLf
    TextBox1.Text &= "Dim strC As String = ""Test.txt""" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("String.Concat(strA, strB, strC) = {0}", String.Concat(strA, strB, strC)) & vbCrLf
End Sub

上記実行結果
03．String.Concat メソッド = String の1つ以上のインスタンス、又は Object の1つ以上のインスタンスの String 形式の値を連結します。
(引数が色々用意されていますので、詳しい使用方法は、MSDN 等を参照願います。)

Dim strA As String = "C:\"
Dim strB As String = "my Documents\"
Dim strC As String = "Test.txt"

String.Concat(strA, strB, strC) = C:\my Documents\Test.txt
このページのトップへ移動します。 ４．Copy メソッドの使用例(指定した String と同じ値を使用して、String の新しいインスタンスを作成する)
[名前空間: System]
String.Copy メソッド = 指定した String と同じ値を使用して、String の新しいインスタンスを作成します。

Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
    Dim strA As String = "abc"
    Dim strB As String = "xyz"
    strB = System.String.Copy(strA)
    Console.WriteLine("strA = {0}　 strB = {1}", strA, strB)

    TextBox1.Text = "04．String.Copy メソッド = 指定した String と同じ値を使用して、" _
                                            & "String の新しいインスタンスを作成します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim strA As String = ""abc""" & vbCrLf
    TextBox1.Text &= "Dim strB As String = ""xyz""" & vbCrLf
    TextBox1.Text &= "strB = System.String.Copy(strA)" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("strA = {0}　 strB = {1}", strA, strB) & vbCrLf
End Sub

上記実行結果
04．String.Copy メソッド = 指定した String と同じ値を使用して、String の新しいインスタンスを作成します。

Dim strA As String = "abc"
Dim strB As String = "xyz"
strB = System.String.Copy(strA)

strA = abc　 strB = abc
このページのトップへ移動します。 ５．EndsWith メソッドの使用例(このインスタンスの末尾が指定した String と一致するかどうかを判断する)
[名前空間: System]
String.EndsWith メソッド = この文字列インスタンスの末尾が、指定した文字列と一致するかどうかを判断します。

Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
    Dim MyPath As String = "c:"
    If MyPath.EndsWith("\") = False Then
        MyPath &= "\"
    End If
    Console.WriteLine("MyPath = {0}　", MyPath)

    TextBox1.Text = "05．String.EndsWith メソッド = この文字列インスタンスの末尾が、" _
                                        & "指定した文字列と一致するかどうかを判断します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim MyPath As String = ""c:""" & vbCrLf
    TextBox1.Text &= "If MyPath.EndsWith(""\"") = False Then" & vbCrLf
    TextBox1.Text &= "    MyPath &= ""\""" & vbCrLf
    TextBox1.Text &= "End If" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("MyPath = {0}　", MyPath) & vbCrLf
End Sub

上記実行結果
05．String.EndsWith メソッド = この文字列インスタンスの末尾が、指定した文字列と一致するかどうかを判断します。

Dim MyPath As String = "c:"
If MyPath.EndsWith("\") = False Then
MyPath &= "\"
End If

MyPath = c:\　
このページのトップへ移動します。 ６．Format メソッドの使用例(指定した文字列の各書式項目を対応するオブジェクトの値と等価のテキストに置換る)
[名前空間: System]
String.Format メソッド = 指定した文字列の各書式項目を、対応するオブジェクトの値と等価のテキストに置換します。
Microsoft.VisualBasic.Strings.Format メソッドの使用例も参照願います。

Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
    Console.WriteLine(String.Format("{0:0,0}", "1234567.89"))
    Console.WriteLine(String.Format("{0:0,0}", 1234567.89))
    Console.WriteLine(String.Format("{0:小計 = 0,0.00}　　{1:合計 = 0,0.00}", 1234.56, 1234567.89))
    Console.WriteLine(String.Format("{0:d}　　{1:t}", Now, Now))

    TextBox1.Text = "06．String.Format メソッド = 指定した文字列の各書式項目を、" _
                                & "対応するオブジェクトの値と等価のテキストに置換します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "String.Format(""{0:0,0}"" ,  ""1234567.89"") = " _
                                                            & String.Format("{0:0,0}", "1234567.89") & vbCrLf
    TextBox1.Text &= "String.Format(""{0:0,0}"" ,  1234567.89)   = " _
                                                    & String.Format("{0:0,0}", 1234567.89) & vbCrLf & vbCrLf
    TextBox1.Text &= "String.Format(""{0:小計 = 0,0.00}　　{1:合計 = 0,0.00}"", 1234.56, 1234567.89)   = " _
            & String.Format("{0:小計 = 0,0.00}　　{1:合計 = 0,0.00}", 1234.56, 1234567.89) & vbCrLf & vbCrLf
    TextBox1.Text &= "String.Format(""{0:d}　　{1:t}"", Now, Now)   = " _
                                                        & String.Format("{0:d}　　{1:t}", Now, Now) & vbCrLf
End Sub

上記実行結果
06．String.Format メソッド = 指定した文字列の各書式項目を、対応するオブジェクトの値と等価のテキストに置換します。

String.Format("{0:0,0}" , "1234567.89") = 1234567.89
String.Format("{0:0,0}" , 1234567.89) = 1,234,568
String.Format("{0:小計 = 0,0.00}　　{1:合計 = 0,0.00}", 1234.56, 1234567.89) = 小計 = 1,234.56　　合計 = 1,234,567.89
String.Format("{0:d}　　{1:t}", Now, Now) = 2015/01/08　　21:17
このページのトップへ移動します。 ７．IndexOf メソッドの使用例(指定した文字列が現在の String 内で最初に見つかった位置を返す)
[名前空間: System]
String.IndexOf メソッド = 指定した文字列が現在の String オブジェクト内で最初に見つかった位置のインデックスをレポートします。
Microsoft.VisualBasic.Strings.InStr メソッドの使用例も参照願います。

Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
    Dim strA As String = "ABCあいうABC"
    Console.WriteLine("strA.IndexOf(""C"") = {0}", strA.IndexOf("C"))
    Console.WriteLine("strA.IndexOf(""C"", CurrentCulture) = {0}", strA.IndexOf("C", StringComparison.CurrentCulture))
    Console.WriteLine("strA.IndexOf(""c"", CurrentCulture) = {0}", strA.IndexOf("c", StringComparison.CurrentCulture))

    TextBox1.Text = "07．String.IndexOf メソッド = 指定した文字列が現在の" _
                & " String オブジェクト内で最初に見つかった位置のインデックスをレポートします。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim strA As String = ""ABCあいうABC""" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("strA.IndexOf(""C"") = {0}", strA.IndexOf("C")) & vbCrLf
    TextBox1.Text &= String.Format("strA.IndexOf(""C"", CurrentCulture) = {0}", _
                                strA.IndexOf("C", StringComparison.CurrentCulture)) & vbCrLf
    TextBox1.Text &= String.Format("strA.IndexOf(""c"", CurrentCulture) = {0}", _
                                strA.IndexOf("c", StringComparison.CurrentCulture)) & vbCrLf
End Sub

上記実行結果
07．String.IndexOf メソッド = 指定した文字列が現在の String オブジェクト内で最初に見つかった位置のインデックスをレポートします。

Dim strA As String = "ABCあいうABC"

strA.IndexOf("C") 　　　　　　　　= 2
strA.IndexOf("C", CurrentCulture) = 2
strA.IndexOf("c", CurrentCulture) = -1
このページのトップへ移動します。 ８．IndexOfAny メソッドの使用例(指定の文字列中に指定した配列内にある文字が最初に見つかった位置を返す)
[名前空間: System]
String.IndexOfAny メソッド = 指定の文字列中に指定した配列内にある文字が最初に見つかった位置を返します。

Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click
    Dim strA As String = "ABCあいう123"
    Dim strs() As Char = {"か"c, "3"c, "B"c}
    'strA 内で　か 又は 3 又は　B が最初に見つかった位置を取得する
    Console.WriteLine("strA.IndexOfAny(strs) = {0}", strA.IndexOfAny(strs))

    TextBox1.Text = "08．String.IndexOfAny メソッド = 指定の文字列中に指定した" _
                            & "配列内にある文字が最初に見つかった位置を返します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "strA 内で　か 又は 3 又は　B が最初に見つかった位置を取得する" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim strA As String = ""ABCあいう123""" & vbCrLf
    TextBox1.Text &= "Dim strs() As Char = {""か""c, ""3""c, ""B""c}" & vbCrLf
    TextBox1.Text &= String.Format("strA.IndexOfAny(strs) = {0}", strA.IndexOfAny(strs)) & vbCrLf
End Sub

上記実行結果
08．String.IndexOfAny メソッド = 指定の文字列中に指定した配列内にある文字が最初に見つかった位置を返します。

strA 内で　か 又は 3 又は　B が最初に見つかった位置を取得する

Dim strA As String 　 = "ABCあいう123"
Dim strs() As Char 　 = {"か"c, "3"c, "B"c}
strA.IndexOfAny(strs) = 1
このページのトップへ移動します。 ９．Insert メソッドの使用例(指定の文字列内の指定したインデックス位置に指定した文字列を挿入する)
[名前空間: System]
String.Insert メソッド = 指定の文字列内の指定したインデックス位置に、指定した文字列を挿入します。

Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click
    Dim strA As String = "ABCあいう123"
    Console.WriteLine("strA.Insert(4, ""XYZ"") = {0}", strA.Insert(4, "XYZ"))

    TextBox1.Text = "09．String.Insert メソッド = 指定の文字列内の指定した" _
                            & "インデックス位置に、指定した文字列を挿入します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim strA As String = ""ABCあいう123""" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("strA.Insert(4, ""XYZ"") = {0}", strA.Insert(4, "XYZ")) & vbCrLf
End Sub

上記実行結果
09．String.Insert メソッド = 指定の文字列内の指定したインデックス位置に、指定した文字列を挿入します。

Dim strA As String 　 = "ABCあいう123"

strA.Insert(4, "XYZ") = ABCあXYZいう123
このページのトップへ移動します。 10．Join メソッドの使用例(指定した配列の要素またはコレクションのメンバーを連結する)
[名前空間: System]
String.Join メソッド = 指定した配列の要素またはコレクションのメンバーを連結します。
　　　　　　　　　　　　各要素の間には、指定した区切り記号が挿入されます。
Microsoft.VisualBasic.Strings.Join メソッドの使用例も参照願います。

Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click
    Dim myData() As String = {"〒555-0011", "彦根市 城町 1-15", "草柳　強"}
    Dim Wk1 As String = String.Join(vbCrLf, myData)
    Dim Wk2 As String = String.Join(" ", myData)
    Console.WriteLine(Wk1)
    Console.WriteLine(Wk2)

    TextBox1.Text = "10．String.Join メソッド = 指定した配列の要素またはコレクションのメンバーを連結します。" & vbCrLf
    TextBox1.Text &= "    各要素の間には、指定した区切り記号が挿入されます。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim myData() As String = {""〒555-0011"", ""彦根市 城町 1-15"", ""草柳　強""}" & vbCrLf
    TextBox1.Text &= "Dim Wk1 As String = String.Join(vbCrLf, myData)" & vbCrLf
    TextBox1.Text &= "Dim Wk2 As String = String.Join("" "", myData)" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("Wk1 =" & Wk1) & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("Wk2 =" & Wk2) & vbCrLf
End Sub

上記実行結果
10．String.Join メソッド = 指定した配列の要素またはコレクションのメンバーを連結します。
各要素の間には、指定した区切り記号が挿入されます。

Dim myData() As String = {"〒555-0011", "彦根市 城町 1-15", "草柳　強"}
Dim Wk1 As String = String.Join(vbCrLf, myData)
Dim Wk2 As String = String.Join(" ", myData)

Wk1 =〒555-0011
彦根市 城町 1-15
草柳　強

Wk2 =〒555-0011 彦根市 城町 1-15 草柳　強
このページのトップへ移動します。 11．LastIndexOf メソッドの使用例(指定の文字列内で最後に出現する指定された文字列のインデックス位置を返す)
[名前空間: System]
String.LastIndexOf メソッド = 指定の文字列内で最後に出現する指定された文字または文字列のインデックス位置を返します。
Microsoft.VisualBasic.Strings.InStrRev メソッドの使用例も参照願います。

Private Sub Button11_Click(sender As Object, e As EventArgs) Handles Button11.Click
    Dim strA As String = "abc123ABC123"
    Console.WriteLine(strA.LastIndexOf("1"))   '結果　 9
    Console.WriteLine(strA.LastIndexOf("c"))   '結果　 2
    Console.WriteLine(strA.LastIndexOf("C"))   '結果　 8
    Console.WriteLine(strA.LastIndexOf("あ"))   '結果　-1　 (見つからない場合)
    Console.WriteLine(strA.LastIndexOf("a"))   '結果　 0
    '比較対象の文字列の大文字と小文字の違いは無視して文字列を比較し検索する。
    Console.WriteLine(strA.LastIndexOf("c", System.StringComparison.OrdinalIgnoreCase))  '結果　 8

    TextBox1.Text = "11．String.LastIndexOf メソッド = 指定の文字列内で最後に出現する" _
                        & "指定された文字または文字列のインデックス位置を返します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim strA As String = ""abc123ABC123""" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("strA.LastIndexOf(""1"")  = {0}", strA.LastIndexOf("1")) & vbCrLf
    TextBox1.Text &= String.Format("strA.LastIndexOf(""c"")  = {0}", strA.LastIndexOf("c")) & vbCrLf
    TextBox1.Text &= String.Format("strA.LastIndexOf(""C"")  = {0}", strA.LastIndexOf("C")) & vbCrLf
    TextBox1.Text &= String.Format("strA.LastIndexOf(""あ"") = {0}", strA.LastIndexOf("あ")) & vbCrLf
    TextBox1.Text &= String.Format("strA.LastIndexOf(""a"")  = {0}", strA.LastIndexOf("a")) & vbCrLf
    TextBox1.Text &= String.Format("strA.LastIndexOf(""c"", System.StringComparison.OrdinalIgnoreCase) = {0}", _
                                        strA.LastIndexOf("c", System.StringComparison.OrdinalIgnoreCase)) & vbCrLf
End Sub

上記実行結果
11．String.LastIndexOf メソッド = 指定の文字列内で最後に出現する指定された文字または文字列のインデックス位置を返します。

Dim strA As String = "abc123ABC123"

strA.LastIndexOf("1")  = 9
strA.LastIndexOf("c")  = 2
strA.LastIndexOf("C")  = 8
strA.LastIndexOf("あ") = -1
strA.LastIndexOf("a")  = 0
このページのトップへ移動します。 12．Length メソッドの使用例(現在の String オブジェクト内の文字数を取得する)
[名前空間: System]
String.Length メソッド = 現在の String オブジェクト内の文字数を取得します。
Microsoft.VisualBasic.Strings.Len メソッドの使用例も参照願います。

Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click
    Dim strA As String = "abcあいう"
    Console.WriteLine("strA.Length = {0}", strA.Length)

    TextBox1.Text = "12．String.Length メソッド = 現在の String オブジェクト内の文字数を取得します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim strA As String = ""abcあいう""" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("strA.Length = {0}", strA.Length) & vbCrLf
End Sub

上記実行結果
12．String.Length メソッド = 現在の String オブジェクト内の文字数を取得します。

Dim strA As String = "abcあいう"
strA.Length 　　　 = 6
このページのトップへ移動します。 13．Remove メソッドの使用例(指定の文字列から指定された文字数を削除した文字列を返す)
[名前空間: System]
String.Remove メソッド = 現在の文字列から指定された文字数を削除した新しい文字列を返します。

Private Sub Button13_Click(sender As Object, e As EventArgs) Handles Button13.Click
    Dim strA As String = "abcあいうえお"
    Console.WriteLine("strA.Remove(3, 2) = {0}", strA.Remove(3, 2))

    TextBox1.Text = "13．String.Remove メソッド = 現在の文字列から指定された文字数を" _
                                        & "削除した新しい文字列を返します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim strA As String = ""abcあいうえお""" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("strA.Remove(3, 2) = {0}", strA.Remove(3, 2)) & vbCrLf
End Sub

上記実行結果
13．String.Remove メソッド = 現在の文字列から指定された文字数を削除した新しい文字列を返します。

Dim strA As String = "abcあいうえお"
strA.Remove(3, 2)  = abcうえお
このページのトップへ移動します。 14．Replace メソッドの使用例(現在の文字列に出現する指定した文字列をすべて別に指定した文字列に置換る)
[名前空間: System]
String.Replace メソッド = 現在の文字列に出現する指定した文字または String をすべて、別に指定した文字または String に置換した新しい文字列を返します。
Microsoft.VisualBasic.Strings.Replace メソッドの使用例も参照願います。

Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click
    '半角スペースを , に置き換えます。
    Console.WriteLine("""AB CD EF"".Replace("" "", "","") = {0}", "AB CD EF".Replace(" ", ","))

    TextBox1.Text = "14．String.Replace メソッド = 現在の文字列に出現する指定した文字または" _
            & " String をすべて、別に指定した文字または String に置換した新しい文字列を返します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "文字列 ""AB CD EF"" の半角スペースを , に置き換えます。" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("""AB CD EF"".Replace("" "", "","") = {0}", "AB CD EF".Replace(" ", ",")) & vbCrLf
End Sub

上記実行結果
14．String.Replace メソッド = 現在の文字列に出現する指定した文字または String をすべて、別に指定した文字または String に置換した新しい文字列を返します。

文字列 "AB CD EF" の半角スペースを , に置き換えます。

"AB CD EF".Replace(" ", ",") = AB,CD,EF
このページのトップへ移動します。 15．Split メソッドの使用例(指定された文字の配列の要素で区切られた部分文字列を格納する文字列配列を返す)
[名前空間: System]
String.Split メソッド = このインスタンス内の、指定された文字列または Unicode 文字の配列の要素で区切られた部分文字列を格納する文字列配列を返します。
(引数が色々用意されていますので、詳しい使用方法は、MSDN 等を参照願います。)
Microsoft.VisualBasic.Strings.Split メソッドの使用例も参照願います。

Private Sub Button15_Click(sender As Object, e As EventArgs) Handles Button15.Click
    Dim myData As String = "〒555-0011,彦根市 城町 1-15,草柳　強"
    Dim Wk1 As String() = myData.Split(","c)
    For i As Integer = Wk1.GetLowerBound(0) To Wk1.GetUpperBound(0)
        Console.WriteLine(Wk1(i))
    Next i


    myData = "〒555-0011滋賀県滋賀県彦根市 城町 1-15滋賀県草柳　強"
    Dim ss() As String = {"滋賀県"}
    Wk1 = myData.Split(ss, StringSplitOptions.None)          '空データも返す
    'Wk1 = myData.Split(ss, StringSplitOptions.RemoveEmptyEntries)　　 '空データは返さない
    For i As Integer = Wk1.GetLowerBound(0) To Wk1.GetUpperBound(0)
        Console.WriteLine(Wk1(i))
    Next i

    TextBox1.Text = "15．String.Split メソッド = このインスタンス内の、指定された文字列または" _
                            & " Unicode 文字の配列の要素で区切られた部分文字列を格納する文字列配列を返します。" & vbCrLf
    TextBox1.Text &= "　　(引数が色々用意されていますので、詳しい使用方法は、MSDN 等を参照願います。)" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim myData As String = ""〒555-0011,彦根市 城町 1-15,草柳　強""" & vbCrLf
    TextBox1.Text &= "Dim Wk1 As String() = myData.Split("",""c)" & vbCrLf & vbCrLf
    For i As Integer = Wk1.GetLowerBound(0) To Wk1.GetUpperBound(0)
        TextBox1.Text &= String.Format("  Wk1({0})) = {1}", i, Wk1(i)) & vbCrLf
    Next i

    TextBox1.Text &= vbCrLf
    TextBox1.Text &= "Dim myData = ""〒555-0011滋賀県滋賀県彦根市 城町 1-15滋賀県草柳　強""" & vbCrLf
    TextBox1.Text &= "Dim ss() As String = {""滋賀県""}" & vbCrLf
    TextBox1.Text &= "Wk1 = myData.Split(ss, StringSplitOptions.None)" & vbCrLf & vbCrLf
    For i As Integer = Wk1.GetLowerBound(0) To Wk1.GetUpperBound(0)
        TextBox1.Text &= String.Format("  Wk1({0})) = {1}", i, Wk1(i)) & vbCrLf
    Next i
End Sub

上記実行結果
15．String.Split メソッド = このインスタンス内の、指定された文字列または Unicode 文字の配列の要素で区切られた部分文字列を格納する文字列配列を返します。
　　(引数が色々用意されていますので、詳しい使用方法は、MSDN 等を参照願います。)

Dim myData As String = "〒555-0011,彦根市 城町 1-15,草柳　強"
Dim Wk1 As String() = myData.Split(","c)

Wk1(0)) = 〒555-0011
Wk1(1)) =
Wk1(2)) = 彦根市 城町 1-15
Wk1(3)) = 草柳　強

Dim myData = "〒555-0011滋賀県滋賀県彦根市 城町 1-15滋賀県草柳　強"
Dim ss() As String = {"滋賀県"}
Wk1 = myData.Split(ss, StringSplitOptions.None)

Wk1(0)) = 〒555-0011
Wk1(1)) =
Wk1(2)) = 彦根市 城町 1-15
Wk1(3)) = 草柳　強
このページのトップへ移動します。 16．StartsWith メソッドの使用例(指定の文字列の先頭が指定した文字列と一致するかどうかを判断する)
[名前空間: System]
String.StartsWith メソッド = この文字列インスタンスの先頭が、指定した文字列と一致するかどうかを判断します。

Private Sub Button16_Click(sender As Object, e As EventArgs) Handles Button16.Click
    Dim s1 As String = "ABC123あいう"
    Console.WriteLine("""ABC123あいう"".StartsWith(""a"") = {0}", "ABC123あいう".StartsWith("a"))
    Console.WriteLine("""ABC123あいう"".StartsWith(""A"") = {0}", "ABC123あいう".StartsWith("A"))
    Console.WriteLine("""ABC123あいう"".StartsWith(""ABC12"") = {0}", "ABC123あいう".StartsWith("ABC12"))
    Console.WriteLine("""ABC123あいう"".StartsWith(""ABあい"") = {0}", "ABC123あいう".StartsWith("ABあい"))
    Console.WriteLine("ABC123あいう".StartsWith("a", StringComparison.OrdinalIgnoreCase))

    TextBox1.Text = "16．String.StartsWith メソッド = この文字列インスタンスの先頭が、" _
                                            & "指定した文字列と一致するかどうかを判断します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim s1 As String = ""ABC123あいう""" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("""ABC123あいう"".StartsWith(""a"") = {0}", "ABC123あいう".StartsWith("a")) & vbCrLf
    TextBox1.Text &= String.Format("""ABC123あいう"".StartsWith(""A"") = {0}", "ABC123あいう".StartsWith("A")) & vbCrLf
    TextBox1.Text &= String.Format("""ABC123あいう"".StartsWith(""ABC12"") = {0}", "ABC123あいう".StartsWith("ABC12")) & vbCrLf
    TextBox1.Text &= String.Format("""ABC123あいう"".StartsWith(""ABあい"") = {0}", "ABC123あいう".StartsWith("ABあい")) & vbCrLf
    TextBox1.Text &= String.Format("""ABC123あいう"".StartsWith(""a"", StringComparison.OrdinalIgnoreCase)" _
                        & " = {0}", "ABC123あいう".StartsWith("a", StringComparison.OrdinalIgnoreCase)) & vbCrLf
End Sub

上記実行結果
16．String.StartsWith メソッド = この文字列インスタンスの先頭が、指定した文字列と一致するかどうかを判断します。

Dim s1 As String = "ABC123あいう"

"ABC123あいう".StartsWith("a") 　　 = False
"ABC123あいう".StartsWith("A") 　　 = True
"ABC123あいう".StartsWith("ABC12")  = True
"ABC123あいう".StartsWith("ABあい") = False
"ABC123あいう".StartsWith("a", StringComparison.OrdinalIgnoreCase) = True
このページのトップへ移動します。 17．String コンストラクターの使用例(String クラスの新しいインスタンスを初期化する)
[名前空間: System]
System.String コンストラクター = String クラスの新しいインスタンスを初期化します。

Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click
    '指定した回数だけ繰り返した指定の Unicode 文字が示す値に設定します。
    Console.WriteLine("New System.String("" ""c, 10) = {0}", New System.String(" "c, 10))
    Console.WriteLine("New System.String(""A""c, 10) = {0}", New System.String("A"c, 10))

    'Unicode 文字の配列、配列内の開始文字位置、および長さにより示される値に設定します。
    Console.WriteLine(New String(DirectCast("ABC123あいう".ToCharArray, Char()), 2, 6))

    TextBox1.Text = "17．System.String コンストラクター = String クラスの新しいインスタンス" _
                                                                    & "を初期化します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "指定した回数だけ繰り返した指定の Unicode 文字が示す値に設定します。" & vbCrLf
    TextBox1.Text &= String.Format("New System.String("" ""c, 10) = {0}", New System.String(" "c, 10)) & vbCrLf
    TextBox1.Text &= String.Format("New System.String(""A""c, 10) = {0}", New System.String("A"c, 10)) & vbCrLf & vbCrLf
    TextBox1.Text &= "Unicode 文字の配列、配列内の開始文字位置、および長さにより示される値に設定します。" & vbCrLf
    TextBox1.Text &= String.Format("New String(DirectCast(""ABC123あいう"".ToCharArray, Char()), 2, 6) = {0}", _
                                            New String(DirectCast("ABC123あいう".ToCharArray, Char()), 2, 6)) & vbCrLf
End Sub

上記実行結果
17．System.String コンストラクター = String クラスの新しいインスタンスを初期化します。

指定した回数だけ繰り返した指定の Unicode 文字が示す値に設定します。
New System.String(" "c, 10) =
New System.String("A"c, 10) = AAAAAAAAAA

Unicode 文字の配列、配列内の開始文字位置、および長さにより示される値に設定します。
New String(DirectCast("ABC123あいう".ToCharArray, Char()), 2, 6) = C123あい
このページのトップへ移動します。 18．Substring メソッドの使用例(インスタンスから部分文字列を取得する)
[名前空間: System]
String.Substring メソッド = インスタンスから部分文字列を取得します。

Private Sub Button18_Click(sender As Object, e As EventArgs) Handles Button18.Click
    'インスタンスから部分文字列を取得します。
    Dim s1 As String = "ABC123あいう"
    '左から3文字を取得
    Console.WriteLine("""ABC123あいう"".Substring(0, 3) = {0}", "ABC123あいう".Substring(0, 3))
    '左から3文字目から3文字を取得
    Console.WriteLine("""ABC123あいう"".Substring(3, 3) = {0}", "ABC123あいう".Substring(3, 3))
    '右から3文字を取得
    Console.WriteLine("s1.Substring(s1.Length - 3, 3) = {0}", s1.Substring(s1.Length - 3, 3))

    TextBox1.Text = "18．String.Substring メソッド = インスタンスから部分文字列を取得します。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim s1 As String = ""ABC123あいう""" & vbCrLf & vbCrLf
    TextBox1.Text &= "左から3文字を取得" & vbCrLf
    TextBox1.Text &= String.Format("  ""ABC123あいう"".Substring(0, 3) = {0}", "ABC123あいう" _
                                                                            .Substring(0, 3)) & vbCrLf & vbCrLf
    TextBox1.Text &= "左から3文字目から3文字を取得" & vbCrLf
    TextBox1.Text &= String.Format("  ""ABC123あいう"".Substring(3, 3) = {0}", "ABC123あいう" _
                                                                            .Substring(3, 3)) & vbCrLf & vbCrLf
    TextBox1.Text &= "右から3文字を取得" & vbCrLf
    TextBox1.Text &= String.Format("  s1.Substring(s1.Length - 3, 3) = {0}", _
                                                                        s1.Substring(s1.Length - 3, 3)) & vbCrLf
End Sub

上記実行結果
18．String.Substring メソッド = インスタンスから部分文字列を取得します。

Dim s1 As String = "ABC123あいう"

左から3文字を取得
"ABC123あいう".Substring(0, 3) = ABC

左から3文字目から3文字を取得
"ABC123あいう".Substring(3, 3) = 123

右から3文字を取得
s1.Substring(s1.Length - 3, 3) = あいう
このページのトップへ移動します。 19．ToCharArray メソッドの使用例(このインスタンスの文字を文字配列へコピーする)
[名前空間: System]
String.ToCharArray メソッド = このインスタンスの文字を Unicode 文字配列へコピーします。

Private Sub Button19_Click(sender As Object, e As EventArgs) Handles Button19.Click
    Dim str1 As String = "ABC123あいう"
    Dim arr() As Char
    arr = str1.ToCharArray()
    For Each c As Char In arr
        Console.Write(c & " , ")
    Next

    Console.WriteLine()
    arr = str1.ToCharArray(3, 4)
    For Each c As Char In arr
        Console.Write(c & " , ")
    Next

    TextBox1.Text = "19．String.ToCharArray メソッド = このインスタンスの文字を" _
                                            & " Unicode 文字配列へコピーします。" & vbCrLf & vbCrLf
    TextBox1.Text &= "Dim str1 As String = ""ABC123あいう""" & vbCrLf
    TextBox1.Text &= "Dim arr() As Char" & vbCrLf
    TextBox1.Text &= "arr = str1.ToCharArray()" & vbCrLf
    TextBox1.Text &= "For Each c As Char In arr" & vbCrLf
    TextBox1.Text &= "    Console.Write(c & "" , "")" & vbCrLf
    TextBox1.Text &= "Next" & vbCrLf & vbCrLf
    TextBox1.Text &= "上記実行結果" & vbCrLf
    TextBox1.Text &= "　A , B , C , 1 , 2 , 3 , あ , い , う ," & vbCrLf & vbCrLf

    TextBox1.Text &= "arr = str1.ToCharArray(3, 4)" & vbCrLf
    TextBox1.Text &= "For Each c As Char In arr" & vbCrLf
    TextBox1.Text &= "    Console.Write(c & "" , "")" & vbCrLf
    TextBox1.Text &= "Next" & vbCrLf & vbCrLf
    TextBox1.Text &= "上記実行結果" & vbCrLf
    TextBox1.Text &= "　1 , 2 , 3 , あ ," & vbCrLf
End Sub

上記実行結果
19．String.ToCharArray メソッド = このインスタンスの文字を Unicode 文字配列へコピーします。

Dim str1 As String = "ABC123あいう"
Dim arr() As Char
arr = str1.ToCharArray()
For Each c As Char In arr
Console.Write(c & " , ")
Next

上記実行結果
　A , B , C , 1 , 2 , 3 , あ , い , う ,

arr = str1.ToCharArray(3, 4)
For Each c As Char In arr
Console.Write(c & " , ")
Next

上記実行結果
　1 , 2 , 3 , あ ,
このページのトップへ移動します。 20．ToLower メソッドの使用例(指定の文字列のコピーを小文字に変換して返す)
[名前空間: System]
String.ToLower メソッド = この文字列のコピーを小文字に変換して返します。

Private Sub Button20_Click(sender As Object, e As EventArgs) Handles Button20.Click
    Console.WriteLine("""AbcdEFGhiJK"".ToLower() = {0}", "AbcdEFGhiJK".ToLower())

    TextBox1.Text = "20．String.ToLower メソッド = この文字列のコピーを小文字に変換して返します。" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("""AbcdEFGhiJK"".ToLower() = {0}", "AbcdEFGhiJK".ToLower()) & vbCrLf
End Sub

上記実行結果
20．String.ToLower メソッド = この文字列のコピーを小文字に変換して返します。

"AbcdEFGhiJK".ToLower() = abcdefghijk
このページのトップへ移動します。 21．ToUpper メソッドの使用例(指定の文字列のコピーを大文字に変換して返す)
[名前空間: System]
String.ToUpper メソッド = この文字列のコピーを大文字に変換して返します。


Private Sub Button21_Click(sender As Object, e As EventArgs) Handles Button21.Click
    Console.WriteLine("""AbcdEFGhiJK"".ToUpper() = {0}", "AbcdEFGhiJK".ToUpper())

    TextBox1.Text = "21．String.ToUpper メソッド = この文字列のコピーを大文字に変換して返します。" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("""AbcdEFGhiJK"".ToUpper() = {0}", "AbcdEFGhiJK".ToUpper()) & vbCrLf
End Sub

上記実行結果
21．String.ToUpper メソッド = この文字列のコピーを大文字に変換して返します。

"AbcdEFGhiJK".ToUpper() = ABCDEFGHIJK
このページのトップへ移動します。 22．Trim メソッドの使用例(指定の文字列の先頭および末尾から指定した文字をすべて削除した文字列を返す)
[名前空間: System]
String.Trim メソッド = 現在の String オブジェクトの先頭および末尾から、指定した文字セットをすべて削除した新しい文字列を返します。
Microsoft.VisualBasic.Strings.Trim メソッドの使用例も参照願います。

Private Sub Button22_Click(sender As Object, e As EventArgs) Handles Button22.Click
    Console.WriteLine("""["" & ""　ABCDEFG　 "".Trim() & ""]"" = {0}", "[" & "　ABCDEFG　 ".Trim() & "]")
    Console.WriteLine("""["" & ""AAABCDEFGAAA"".Trim(""A""c) & ""]"" = {0}", "[" & "AAABCDEFGAAA".Trim("A"c) & "]")

    TextBox1.Text = "22．String.Trim メソッド = 現在の String オブジェクトの先頭および末尾から、" _
                                & "指定した文字セットをすべて削除した新しい文字列を返します。" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("""["" & ""　ABCDEFG　 "".Trim() & ""]"" 　　= {0}", "[" _
                                                                        & "　ABCDEFG　 ".Trim() & "]") & vbCrLf
    TextBox1.Text &= String.Format("""["" & ""AAABCDEFGAAA"".Trim(""A""c) & ""]"" = {0}", "[" _
                                                                    & "AAABCDEFGAAA".Trim("A"c) & "]") & vbCrLf
End Sub

上記実行結果
22．String.Trim メソッド = 現在の String オブジェクトの先頭および末尾から、指定した文字セットをすべて削除した新しい文字列を返します。

"[" & "　ABCDEFG　 ".Trim() & "]" 　　= [ABCDEFG]
"[" & "AAABCDEFGAAA".Trim("A"c) & "]" = [BCDEFG]
このページのトップへ移動します。 23．TrimEnd メソッドの使用例(指定の文字列の末尾から指定した文字をすべて削除した文字列を返す)
[名前空間: System]
String.TrimEnd メソッド = 現在の String オブジェクトの末尾から、指定した文字セットをすべて削除した新しい文字列を返します。
Microsoft.VisualBasic.Strings.RTrim メソッドの使用例も参照願います。

Private Sub Button23_Click(sender As Object, e As EventArgs) Handles Button23.Click
    Console.WriteLine("""["" & ""　ABCDEFG　 "".TrimEnd() & ""]"" = {0}", "[" & "　ABCDEFG　 ".TrimEnd() & "]")
    Console.WriteLine("""["" & ""AAABCDEFGAAA"".TrimEnd(""A""c) & ""]"" = {0}", "[" & "AAABCDEFGAAA".TrimEnd("A"c) & "]")

    TextBox1.Text = "23．String.TrimEnd メソッド = 現在の String オブジェクトの末尾から、" _
                                    & "指定した文字セットをすべて削除した新しい文字列を返します。" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("""["" & ""　ABCDEFG　 "".TrimEnd() & ""]"" 　　= {0}", "[" _
                                                                            & "　ABCDEFG　 ".TrimEnd() & "]") & vbCrLf
    TextBox1.Text &= String.Format("""["" & ""AAABCDEFGAAA"".TrimEnd(""A""c) & ""]"" = {0}", "[" _
                                                                        & "AAABCDEFGAAA".TrimEnd("A"c) & "]") & vbCrLf
End Sub

上記実行結果
23．String.TrimEnd メソッド = 現在の String オブジェクトの末尾から、指定した文字セットをすべて削除した新しい文字列を返します。

"[" & "　ABCDEFG　 ".TrimEnd() & "]" 　　= [　ABCDEFG]
"[" & "AAABCDEFGAAA".TrimEnd("A"c) & "]" = [AAABCDEFG]
このページのトップへ移動します。 24．TrimStart メソッドの使用例(指定の文字列の先頭から指定した文字をすべて削除した文字列を返す)
[名前空間: System]
String.TrimStart メソッド = 現在の String オブジェクトの先頭から、指定した文字セットをすべて削除した新しい文字列を返します。
Microsoft.VisualBasic.Strings.LTrim メソッドの使用例も参照願います。

Private Sub Button24_Click(sender As Object, e As EventArgs) Handles Button24.Click
    Console.WriteLine("""["" & ""　ABCDEFG　 "".TrimStart() & ""]"" = {0}", "[" & "　ABCDEFG　 ".TrimStart() & "]")
    Console.WriteLine("""["" & ""AAABCDEFGAAA"".TrimStart(""A""c) & ""]"" = {0}", "[" _
                                                                            & "AAABCDEFGAAA".TrimStart("A"c) & "]")

    TextBox1.Text = "24．String.TrimStart メソッド = 現在の String オブジェクトの" _
                            & "先頭から、指定した文字セットをすべて削除した新しい文字列を返します。" & vbCrLf & vbCrLf
    TextBox1.Text &= String.Format("""["" & ""　ABCDEFG　 "".TrimStart() & ""]"" 　　= {0}", "[" _
                                                                        & "　ABCDEFG　 ".TrimStart() & "]") & vbCrLf
    TextBox1.Text &= String.Format("""["" & ""AAABCDEFGAAA"".TrimStart(""A""c) & ""]"" = {0}", "[" _
                                                                    & "AAABCDEFGAAA".TrimStart("A"c) & "]") & vbCrLf
End Sub

上記実行結果
24．String.TrimStart メソッド = 現在の String オブジェクトの先頭から、指定した文字セットをすべて削除した新しい文字列を返します。

"[" & "　ABCDEFG　 ".TrimStart() & "]" 　　= [ABCDEFG　 ]
"[" & "AAABCDEFGAAA".TrimStart("A"c) & "]" = [BCDEFGAAA]
このページのトップへ移動します。 25．



このページのトップへ移動します。 26．



このページのトップへ移動します。 検索キーワード及びサンプルコードの別名(機能名)





このページのトップへ移動します。