文字列関数 (Visual Basic)
Visual Basic で文字列の検索と操作のために用意されている関数の一覧を次の表に示します。
.NET Framework メソッド |
Description |
|---|---|
文字に対応する文字コードを表す Integer 値を返します。 |
|
指定された文字コードに対応する文字を返します。 |
|
指定されたフィルター条件に基づいた文字列 (String) 配列のサブセットを含むゼロ ベースの配列を返します。 |
|
書式指定文字列 (String) 式に含まれる指示に従って書式設定された文字列を返します。 |
|
システムの [コントロール パネル] で定義されている通貨記号を使って通貨形式の文字列に書式設定して返す文字列処理関数です。 |
|
日時の値を表す文字列式を返します。 |
|
数値形式の文字列に書式設定して返す文字列処理関数です。 |
|
パーセント記号 (%) が付加されたパーセント形式 (100 で乗算した) の文字列に書式設定して返す文字列処理関数です。 |
|
ある文字列の中から指定した文字列を検索し、最初に見つかった文字列の開始位置を示す整数型 (Integer) の値を返します。 |
|
ある文字列 (StringCheck) の中から指定された文字列 (StringMatch) を最後の文字位置から検索を開始し、最初に見つかった文字位置 (先頭からその位置までの文字数) を返します。 |
|
配列に含まれる多数の部分文字列を結合して作成される文字列を返します。 |
|
小文字に変換した文字列または文字を返します。 |
|
指定された文字数を含む文字列を返します。 |
|
文字列内の文字数を含む整数を返します。 |
|
指定の文字列が含まれている文字列を左寄せで指定の長さに調整して返します。 |
|
指定された文字列から、先頭の空白を除いたコピーを格納する文字列を返します。 |
|
文字列から指定された文字数分の文字列を返します。 |
|
指定された文字列の一部を指定された回数分別の部分文字列で置換した文字列を返します。 |
|
文字列の右端から指定された文字数分の文字列を返します。 |
|
文字列と長さが指定され、その長さに調整された文字列右揃えにして文字列を返します。 |
|
指定された文字列から、末尾の空白を除いたコピーを格納する文字列を返します。 |
|
指定された数のスペースから成る文字列を返します。 |
|
部分文字列ごとに区切られた文字列からゼロ ベースの 1 次元配列を作成し、返します。 |
|
文字列比較の結果により、-1、0、または 1 のいずれかを返します。 |
|
指定に従って変換された文字列型 (String) の値を返します。 |
|
指定された文字が指定された回数繰り返されている文字列型 (String) またはオブジェクト型 (Object) の値を返します。 |
|
指定された文字列の文字の並び順を逆にした文字列を返します。 |
|
指定された文字列から、先頭または末尾の空白を除いたコピーを格納する文字列を返します。 |
|
指定された文字列を大文字に変換して文字列型 (String) または char 型 (Char) の値を返します。 |
Option Compare ステートメントを使用して、文字列の比較方法を設定できます。比較方法は、システムのロケールで決定される、文字列が大文字と小文字を区別しないテキストの並べ替え順序 (Text)、または文字の内部バイナリ表現 (Binary) です。既定のテキスト比較方法は Binary です。
使用例
UCase 関数を使って文字列を大文字に変換して返す例を次に示します。
' String to convert.
Dim LowerCase As String = "Hello World 1234"
' Returns "HELLO WORLD 1234".
Dim UpperCase As String = UCase(LowerCase)
この例では、文字列変数から、LTrim 関数を使って先頭の空白を除去し、RTrim 関数を使って後続の空白を除去しています。また、Trim 関数を使って両方のタイプの空白を除去しています。
' Initializes string.
Dim TestString As String = " <-Trim-> "
Dim TrimString As String
' Returns "<-Trim-> ".
TrimString = LTrim(TestString)
' Returns " <-Trim->".
TrimString = RTrim(TestString)
' Returns "<-Trim->".
TrimString = LTrim(RTrim(TestString))
' Using the Trim function alone achieves the same result.
' Returns "<-Trim->".
TrimString = Trim(TestString)
Mid 関数を使って、文字列から指定された字数を返す例を次に示します。
' Creates text string.
Dim TestString As String = "Mid Function Demo"
' Returns "Mid".
Dim FirstWord As String = Mid(TestString, 1, 3)
' Returns "Demo".
Dim LastWord As String = Mid(TestString, 14, 4)
' Returns "Function Demo".
Dim MidWords As String = Mid(TestString, 5)
Len 関数を使って文字列の文字数を返す例を次に示します。
' Initializes variable.
Dim TestString As String = "Hello World"
' Returns 11.
Dim TestLen As Integer = Len(TestString)
InStr 関数を使って、ある文字列の中から指定された文字列を検索し、最初に見つかった文字位置を返す例を次に示します。
' String to search in.
Dim SearchString As String = "XXpXXpXXPXXP"
' Search for "P".
Dim SearchChar As String = "P"
Dim TestPos As Integer
' A textual comparison starting at position 4. Returns 6.
TestPos = InStr(4, SearchString, SearchChar, CompareMethod.Text)
' A binary comparison starting at position 1. Returns 9.
TestPos = InStr(1, SearchString, SearchChar, CompareMethod.Binary)
' If Option Compare is not set, or set to Binary, return 9.
' If Option Compare is set to Text, returns 3.
TestPos = InStr(SearchString, SearchChar)
' Returns 0.
TestPos = InStr(1, SearchString, "W")
String の書式指定とユーザー定義の書式指定の両方を使って値の書式を指定する、Format 関数のさまざまな使用例を次に示します。日付の区切り記号 (/)、時刻の区切り記号 (:)、および午前/午後を示す文字 (t および tt) について、システムで実際に表示される書式は、コードが使用するロケール設定によって決まります。時刻と日付を開発環境で表示する場合は、コード ロケールの短い時刻書式と短い日付書式が使用されます。
[!メモ]
24 時間制を使用するロケールでは、午前/午後を示す記号 (t および tt) では何も表示されません。
Dim TestDateTime As Date = #1/27/2001 5:04:23 PM#
Dim TestStr As String
' Returns current system time in the system-defined long time format.
TestStr = Format(Now(), "Long Time")
' Returns current system date in the system-defined long date format.
TestStr = Format(Now(), "Long Date")
' Also returns current system date in the system-defined long date
' format, using the single letter code for the format.
TestStr = Format(Now(), "D")
' Returns the value of TestDateTime in user-defined date/time formats.
' Returns "5:4:23".
TestStr = Format(TestDateTime, "h:m:s")
' Returns "05:04:23 PM".
TestStr = Format(TestDateTime, "hh:mm:ss tt")
' Returns "Saturday, Jan 27 2001".
TestStr = Format(TestDateTime, "dddd, MMM d yyyy")
' Returns "17:04:23".
TestStr = Format(TestDateTime, "HH:mm:ss")
' Returns "23".
TestStr = Format(23)
' User-defined numeric formats.
' Returns "5,459.40".
TestStr = Format(5459.4, "##,##0.00")
' Returns "334.90".
TestStr = Format(334.9, "###0.00")
' Returns "500.00%".
TestStr = Format(5, "0.00%")