VB6VB の Left, Mid, Right のように文字列を取り出す

スポンサーリンク

VB6 では、そのまま Left, Mid, Right (Left$, Mid$, Right$) 関数が使用できます。

サンプルコード

以下にサンプルコードを示します。

VB6.0 以前
    ' 必要な変数を宣言する
    Dim stTarget As String
    stTarget = "ABCDEF"

    ' 左端から 4 文字の文字列を取得する
    Call MsgBox(Left$(stTarget, 4))                      'ABCD

    ' 左端から 2 文字目以降のすべての文字列を取得する
    Call MsgBox(Mid$(stTarget, 2))                       'BCDEF

    ' 左端から 2 文字目から 3 文字の文字列を取得する
    Call MsgBox(Mid$(stTarget, 2, 3))                    'BCD

    ' 右端から 4 文字の文字列を取得する
    Call MsgBox(Right$(stTarget, 4))                     'CDEF

関連するリファレンス

準備中です。

スポンサーリンク