在VB中，可以使用正則表達式或者循環遍歷字符串的每個字符來提取字符串中的數字。以下是兩種常見的方法。
方法一：使用正則表達式提取數字
Imports System.Text.RegularExpressions
Dim inputString As String = "Hello123World456"
Dim numbers As MatchCollection = Regex.Matches(inputString, "\d+")
For Each number As Match In numbers
Console.WriteLine(number.Value)
Next
這段代碼使用了正則表達式\d+來匹配一個或多個數字。MatchCollection對象將包含所有匹配的數字。然后可以使用For Each循環遍歷MatchCollection并輸出每個數字。
方法二：使用循環遍歷提取數字
Dim inputString As String = "Hello123World456"
Dim numberBuilder As New StringBuilder()
For Each c As Char In inputString
If Char.IsDigit(c) Then
numberBuilder.Append(c)
End If
Next
Dim numbers As String = numberBuilder.ToString()
Console.WriteLine(numbers)
在這個方法中，我們循環遍歷了輸入字符串的每個字符。如果字符是數字，我們將其追加到一個StringBuilder對象中。最后，我們將StringBuilder對象轉換為字符串，并輸出結果。
無論是使用正則表達式還是循環遍歷，都可以提取字符串中的數字。選擇哪種方法取決于你的具體需求和個人喜好。
