Question

vb.net怎么提取字符串？

比如有一个Label显示的是"12345"怎么提取它的左边两位数，右边两位数，中间一位数？并转化为可以计算的数字。

Answer 1

在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

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

Answer 2

substring和MID函数都可以用于字符串截取，IsNumeric可以判断字符串是否是数字

Dim a As String = "12345"
MsgBox(a.Substring(0, 2))
MsgBox(a.Substring(2, 1))
MsgBox(a.Substring(3))

If IsNumeric(a.Substring(0, 2)) Then
'是数字
Else
'不是数字
End If

追问

用Left,Right和Mid不行吗？

Answer 3

int(mid("12345",1,2))