[VB.NET] การตัดเอาเฉพาะ String ออกจาก Number ทำยังไงครับ ?

dim str as string = "A-393-N98B1I3U5N";
dim result as string = System.Text.RegularExpressions.Regex.Replace(str, "[^A-Z]", "");

Dim result As String = New String("A-393-N98B1I3U5N").Where(Function(c As Char) Char.IsDigit(c)).ToArray()
'ผลลัพธ์ 39398135
'หรือ 
Dim result As String = "A-393-N98B1I3U5N".Where(Function(c As Char) Char.IsDigit(c)).ToArray()
'ผลลัพธ์ 39398135