VB.NETで文字列のなかから数字だけ抽出

正規表現使う

Imports System.Text.RegularExpressions
...

Dim reg As New Regex("[^\d]")   '--- [^0-9]でもよい
Dim strSrc As String = "あいうえ1234おー"
Dim strDes As String = reg.Replace(strSrc, "")