正規表現使う
Imports System.Text.RegularExpressions
...
Dim reg As New Regex("[^\d]") '--- [^0-9]でもよい
Dim strSrc As String = "あいうえ1234おー"
Dim strDes As String = reg.Replace(strSrc, "")
正規表現使う
Imports System.Text.RegularExpressions
...
Dim reg As New Regex("[^\d]") '--- [^0-9]でもよい
Dim strSrc As String = "あいうえ1234おー"
Dim strDes As String = reg.Replace(strSrc, "")