vb.net截断字符串,vb截取字符串的函数

Vb.net 字符串截取

｛“Xm”：“李明”，“Dh”：“123456”，“Nl”：“30”｝这是个JSON串，在序列化后，可以得到值。你可以使用System.Web.Script.Serialization.JavaScriptSerializer类来完成任务。也可以利用第三方工具比如：Newtonsoft.Json.dll等，来完成任务。

如何使用System.Web.Script.Serialization.JavaScriptSerializer类或第三方工具，网上有大量代码，或参阅微软在线帮助。这里就不贴了。

相关问答

Q1: vb.net截取字符串的问题

可以如下截取056

Private Sub Command1_Click()

a = "123.45056"

Me.Caption = Mid(a, InStr(a, "056"), 3)

End Sub

Q2: VB.net2010按指定字符截取字符串

Dim str0 As String, idx As Long, str1 As String, str2 As String

str0 = "122012312｝R4561_456}7894321}1234123123}"

idx = str0.IndexOf("}")

Do While idx = 0

str1 = str0.Substring(0, idx)

str2 = str0.Substring(idx + 1)

'在文本框中添加显示str1、str2,代码略

str0 = str2

idx = str0.IndexOf("}")

Loop

Q3: VB.NET如何截取字符串最后几位

'这个当然可以，用mid 取字符串的位置长度

        Dim str As String = "16461了工有6149夺中46146好31"

        Label1.Text = Mid(str, str.Length - 3, 3) '取字符串最后3位数

        Label2.Text = Mid(str, 1, 3) '取字符串前面3位数

Q4: 求vb.net大神,将字符串分割，急！！！！

原字符串里：00.0 R-1 SW_STOP 6-9 之间是不是有空格？

如果是的话

Dim STR1, STR2() As String

Dim arr1 As New ArrayList

STR1 = ":00.00 R-1 Sw_STOP 6-9" '你原来的字符串

STR2 = STR1.Split(" ") ‘按空格符截取

Dim i As Integer

For i = 0 To STR2.Length - 1 Step 1

If STR2(i) "" Then

arr1.Add(STR2(i))

End If

Next

最后得到的 arr1 就是分割后的字符串集合

如果原字符串没有空格，并且字符串长度固定，截取出来的部分也固定

那么就用 substring函数 一个一个的截取也就试了

如果原字符串长度也不固定，那么要根据你的截取规则来做。如果上述两个答案不能解决的话还需要更详细的问题