web-dev-qa-db-ja.com

文字列から数字のみを取得する

文字列から数字だけを取得したい。

これが私の文字列だと言わないように：

324ghgj123

私は手に入れたい：

324123

私が試したもの：

MsgBox(Integer.Parse("324ghgj123"))
vb.netwinforms
16
Nh123

これを試して：

Dim mytext As String = "123a123"
Dim myChars() As Char = mytext.ToCharArray()
For Each ch As Char In myChars
     If Char.IsDigit(ch) Then
          MessageBox.Show(ch)
     End If
Next

または：

Private Shared Function Num(ByVal value As String) As Integer
    Dim returnVal As String = String.Empty
    Dim collection As MatchCollection = Regex.Matches(value, "\d+")
    For Each m As Match In collection
        returnVal += m.ToString()
    Next
    Return Convert.ToInt32(returnVal)
End Function
19
famf

これにはRegexを使用できます

Imports System.Text.RegularExpressions

次に、コードの一部で

Dim x As String = "123a123&*^*&^*&^*&^   a sdsdfsdf"
MsgBox(Integer.Parse(Regex.Replace(x, "[^\d]", "")))
28
John Woo

または、文字列が文字の配列であるという事実を使用できます。

Public Function getNumeric(value As String) As String
    Dim output As StringBuilder = New StringBuilder
    For i = 0 To value.Length - 1
        If IsNumeric(value(i)) Then
            output.Append(value(i))
        End If
    Next
    Return output.ToString()
End Function
5
Mark Hall
resultString = Regex.Match(subjectString, @"\d+").Value;

その数を文字列として提供します。次に、Int32.Parse（resultString）が番号を提供します。

2
Suraj

これらの個々の回答のいくつかを実際に組み合わせて、値0の整数、または文字列内のすべての数値を連結した整数を返す単一行ソリューションを作成できます。しかし、それがどれほど有用かはわかりません。これは、数字の文字列のみを作成する方法として始まりました。

    Dim TestMe = CInt(Val(New Text.StringBuilder((From ch In "123abc123".ToCharArray Where IsNumeric(ch)).ToArray).ToString))
1
jinzai
str="something1234text456"   

Set RegEx = CreateObject("vbscript.regexp")
RegEx.Pattern = "[^\d+]"
RegEx.IgnoreCase = True
RegEx.Global = True
numbers=RegEx.Replace(str, "")(0)
msgbox numbers
0
Sandip Kolawale

数字なしの文字列を返す関数

Public Function _RemoveNonDigitCharacters(S As String) As String
        Return New String(S.Where(Function(x As Char) System.Char.IsDigit(x)).ToArray)
End Function
0
Dariusz

線形検索アプローチでは、このアルゴリズムを使用できます。C＃ですが、vb.netで簡単に翻訳できます。

string str = “123a123”;

for(int i=0;i<str.length()-1;i++)
{
    if(int.TryParse(str[i], out nval))
        continue;
    else
        str=str.Rremove(i,i+1);
}
0
SajjadHashmi