文字列の前から・後ろから検索 : Access

Access VBAで前から検索するには「instr関数」を、後ろから検索するには「instrrev関数」を使います。

・instr関数の書式 [ ]は省略できます
 instr( [開始位置] , 検索される文字列 , 検索する文字列 , [比較方法] )

・instrrev関数の書式 [ ]は省略できます
 instr( 検索される文字列 , 検索する文字列 , [開始位置] , [比較方法] )



BackHome BackTips Backメニュー

■ Access実行画面

「検索開始」ボタンで実行します。
検索文字や比較方法など変更しお試しください。
見つかった文字位置

■ Access VBA 実行コード

Option Compare Database
Option Explicit

Private Sub コマンド0_Click()
    Dim s As String
    Dim n As Long
    s = "abcABCABCアイウアイウあいうabcABCABCアイウアイウあいう"
    Me!テキスト3 = s & vbCrLf & vbCrLf
    n = InStr(s, "abc")
    Me!テキスト3 = Me!テキスト3 & "前 abc: " & n & vbCrLf
    n = InStrRev(s, "abc")
    Me!テキスト3 = Me!テキスト3 & "後 abc: " & n & vbCrLf
    n = InStr(s, "あいう")
    Me!テキスト3 = Me!テキスト3 & "前 あいう: " & n & vbCrLf
    n = InStrRev(s, "あいう")
    Me!テキスト3 = Me!テキスト3 & "後 あいう: " & n & vbCrLf
End Sub


BackHome BackTips Backメニュー

Copyright(C) FeedSoft