文字列から数字の抽出方法

2年 ago
綾乃, 一希
1 minute

VBでは、正規表現やループを使用して文字列から数字を抽出できます。以下に、2つの方法の例を示します。

正規表現を使用して

Imports System.Text.RegularExpressions

Dim input As String = "abc123def456"
Dim regex As Regex = New Regex("\d+")
Dim matches As MatchCollection = regex.Matches(input)

For Each match As Match In matches
    Console.WriteLine(match.Value)
Next

ループを利用する

Dim input As String = "abc123def456"
Dim number As String = ""

For Each character As Char In input
    If Char.IsDigit(character) Then
        number += character
    ElseIf number <> "" Then
        Console.WriteLine(number)
        number = ""
    End If
Next

If number <> "" Then
    Console.WriteLine(number)
End If

これらの例では、入力文字列には半角数字とその他の文字が含まれており、スペースや区切り文字はないものと仮定します。

bannerAds