訪問して頂きありがとうございます。まさふくろーです。
この記事では、文字列が指定文字列で始まって（終わって）いるかを調べる方法をご紹介します。
文字列が指定文字列で始まって（終わって）いるかを調べる
文字列.StartsWith(始まりの文字列)
文字列.EndsWith(終わりの文字列)
| 補足 |
| 指定した文字列で始まっている（終わっている）場合は「True」、そうでない場合は「False」を返します。 |
サンプルプログラム【１】
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 |
Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim InputString As String Dim AreaName As String InputString = TextBox1.Text If InputString.StartsWith("01") = True Then AreaName = "北海道・北東北地方" ElseIf InputString.StartsWith("02") = True Then AreaName = "南東北・北関東・信越地方" ElseIf InputString.StartsWith("03") = True Or InputString.StartsWith("04") = True Then AreaName = "南関東地方" ElseIf InputString.StartsWith("05") = True Then AreaName = "中京・東海地方" ElseIf InputString.StartsWith("06") = True Or InputString.StartsWith("07") = True Then AreaName = "近畿・北陸地方" ElseIf InputString.StartsWith("08") = True Then AreaName = "中国・四国地方" ElseIf InputString.StartsWith("09") = True Then AreaName = "九州地方" Else AreaName = "市外局番ではありません。" End If Label1.Text = AreaName End Sub End Class |
| 2 | 「市外局番チェック」ボタンがクリックされた場合に、以下処理を行う。 |
| 7 | テキストボックスに入力した値を、文字列型の変数「InputString」に代入。 |
| 9 | 入力された値が「01」で始まっている場合、 |
| 11 | 文字列型の変数「AreaName」に文字列「北海道・北東北地方」を代入。 |
| 13～35 | 同様に、入力された値によって、場合分けを行う。 |
| 36 | どの条件にも当てはまらない場合は、 |
| 38 | 文字列型の変数「AreaName」に文字列「市外局番ではありません。」を代入。 |
| 42 | 変数「AreaName」の値をラベルに表示する。 |
サンプルプログラム【２】
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 |
Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim InputString As String Dim DomainName As String InputString = TextBox1.Text If InputString.ToLower.EndsWith("com") = True Then DomainName = "企業や商用サービスを表すドメイン" ElseIf InputString.ToLower.EndsWith("net") = True Then DomainName = "ネットワークサービスの提供者を表すドメイン" ElseIf InputString.ToLower.EndsWith("org") = True Then DomainName = "非営利団体を表すドメイン" Else DomainName = "その他ドメイン" End If Label1.Text = DomainName End Sub End Class |
| 2 | 「ドメインチェック」ボタンがクリックされた場合に、以下処理を行う。 |
| 7 | テキストボックスに入力した値を、文字列型の変数「InputString」に代入。 |
| 9 | 入力された値が「com」で終わっている場合、（大文字で入力された場合にも対応するため、ToLowerメソッドで小文字に変換しています。） |
| 11 | 文字列型の変数「DomainName」に文字列「企業や商用サービスを表すドメイン」を代入。 |
| 13～19 | 同様に、入力された値によって、場合分けを行う。 |
| 21 | どの条件にも当てはまらない場合は、 |
| 23 | 文字列型の変数「DomainName」に文字列「その他ドメイン」を代入。 |
| 27 | 変数「DomainName」の値をラベルに表示する。 |
関連記事
最後まで読んでいただき、ありがとうございました！
本のまとめ関連記事はこちら
