「VB.NET」Midメソッドで文字列を切り出すサンプル

2021年11月26日

書式
Mid(文字列,開始の位置 ,文字数)
指定した箇所から指定した文字数分の文字を切り出します
開始の位置は1~
使用例

Module Module1

    Public Sub Main()

        '半角英文字
        Dim str As String
        str = "study88skill"
        Console.WriteLine("半角英文字から指定の位置から文字を切り出す")
        Console.WriteLine(Mid(str, 1, 2))
        Console.WriteLine(Mid(str, 1, 3))
        Console.WriteLine(Mid(str, 1, 4))

        Console.WriteLine("")

        '全角文字
        Dim str2 As String
        str2 = "テスト太郎"
        Console.WriteLine("全角文字から指定の位置から文字を切り出す")
        Console.WriteLine(Mid(str2, 1, 1))
        Console.WriteLine(Mid(str2, 1, 2))
        Console.WriteLine(Mid(str2, 1, 3))
        Console.WriteLine(Mid(str2, 2, 2))

        Console.ReadKey()
    End Sub

End Module

実行結果

半角英文字から指定の位置から文字を切り出す
st
stu
stud

全角文字から指定の位置から文字を切り出す
テ
テス
テスト
スト

 

VB.net

Posted by arkgame