「VB.NET」InStrで指定文字列を検索し、最初の位置を返す

2021年9月16日

書式
Public Function InStr (StartPos As Integer, String1 As String, String2 As String, Optional Compare As CompareMethod =
Microsoft.VisualBasic.CompareMethod.Binary) As Integer
ある文字列の中から指定した文字列を検索し、最初に見つかった文字列の開始位置を示す整数型の値を返します。

使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Imports System.IO
Module Module1
Sub Main()
' 検索対象文字列
Dim searchString As String = "AApBBpCCPDDP"
' 指定文字列 "P".
Dim searchChar As String = "P"
Dim resPos As Integer
' 検索開始位置 4 開始インデックスは1~始まる 最初に見つかった文字列の開始位置
resPos = InStr(4, searchString, searchChar, CompareMethod.Text)
Console.WriteLine("指定文字列を検索し、最初に見つかった文字列の開始位置")
Console.WriteLine(resPos)
Console.ReadKey()
End Sub
End Module
Imports System.IO Module Module1 Sub Main() ' 検索対象文字列 Dim searchString As String = "AApBBpCCPDDP" ' 指定文字列 "P". Dim searchChar As String = "P" Dim resPos As Integer ' 検索開始位置 4 開始インデックスは1~始まる 最初に見つかった文字列の開始位置 resPos = InStr(4, searchString, searchChar, CompareMethod.Text) Console.WriteLine("指定文字列を検索し、最初に見つかった文字列の開始位置") Console.WriteLine(resPos) Console.ReadKey() End Sub End Module
Imports System.IO

Module Module1

    Sub Main()

        ' 検索対象文字列
        Dim searchString As String = "AApBBpCCPDDP"
        ' 指定文字列 "P".
        Dim searchChar As String = "P"

        Dim resPos As Integer
        ' 検索開始位置 4 開始インデックスは1~始まる 最初に見つかった文字列の開始位置
        resPos = InStr(4, searchString, searchChar, CompareMethod.Text)
        Console.WriteLine("指定文字列を検索し、最初に見つかった文字列の開始位置")
        Console.WriteLine(resPos)
        Console.ReadKey()

    End Sub

End Module

結果
指定文字列を検索し、最初に見つかった文字列の開始位置
6

VB.net

Posted by arkgame