vb.net取字符串数字 vb从字符串提取数字

VB.NET用正则表达提取数字的问题！

你把替换所有非数字为空字符串,改为替换所有非数字为空格,就可以把每组数字分开了.

完整的程序如下(改动的地方见注释)

Dim bbb As String

bbb = TextBox1.Text  

Dim My_str As String = Regex.Replace(bbb, "[^0-9]", " ") '这里把替换所有非数字为空字符串,改为替换所有非数字为空格

MsgBox(My_str)

相关问答

Q1: vb.net怎么提取字符串？

在VB中是这样的，没学过VB.net，你变换一下就可以了

按你说的，用用Left,Right和Mid

Option Explicit

Private Sub Command1_Click()

    Dim Num(2)

    Num(0) = Val(Left(Label1.Caption, 2))

    Num(1) = Val(Mid(Label1.Caption, 3, 1))

    Num(2) = Val(Right(Label1.Caption, 2))

    MsgBox "Num(0)="  Num(0)  vbCrLf  "Num(1)="  Num(1)  vbCrLf  "Num(2)="  Num(2)

    '如果想测试是不是可以计算，可以用这一句

    'MsgBox "Num(0)+1="  Num(0) + 1  vbCrLf  "Num(1)+1="  Num(1) + 1  vbCrLf  "Num(2)+1="  Num(2) + 1

End Sub

Private Sub Form_Load()

    Label1.Caption = "12345"

End Sub

有问题请追问，满意请采纳！

Q2: vb.net 2010 如何把文本框中的数字提取出来

源代码如下vb.net取字符串数字：（代码写在按钮点击事件里）

Label1.Text = ""

        Label2.Text = ""

        Dim a As String = TextBox1.Text

        Dim b As String = TextBox2.Text

        For x = 1 To a.Length

            Dim txt As String = Mid(a, x, 1)

            If txt Like "#" Then

                Label1.Text = Label1.Text txt

            End If

        Next

        For x = 1 To b.Length

            Dim txt As String = Mid(b, x, 1)

            If txt Like "#" Then

                Label2.Text = Label2.Text txt

            End If

        Next

此方法用的是mid 将一个字符串拆分成单个字符，然后用like运算符进行对比是否为数字，关于这两个函数的用法如果不懂的可以自己搜索下，此外还有别的方法，这里就不多说vb.net取字符串数字了

vb.net取字符串数字的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb从字符串提取数字、vb.net取字符串数字的信息别忘了在本站进行查找喔。