Asc、Chr関数

Asc 関数は指定した文字列先頭の文字コードを返します。
Chr 関数は指定した文字コードに対応する文字を返します。

スポンサーリンク

Asc関数の使用方法

構文
Asc(String)

【戻り値】 整数型 (Integer) 
引数名 省略 説明
String × 任意の文字列を指定します。

Chr関数の使用方法

構文
Chr(Charcode)

【戻り値】 文字列型 (String)
引数名 省略 説明
Charcode × 文字を特定するための整数値をを指定します。

Asc, Chr関数の使用例

ある文字から文字コードが連続する文字列を取得する例です。

Sub sample_ef02C_01()
    Dim wCode   As Integer
    Dim wStr    As String
    Dim i       As Integer

    '表示を開始する最初の文字コードを取得
    wCode = Asc("A")
    wStr = ""

    '取得した文字コードから連続する10文字を結合
    For i = 0 To 9
        wStr = wStr & Chr(wCode + i)
    Next i

    Debug.Print wStr
End Sub
タイトルとURLをコピーしました