'这个当然可以，用mid 取字符串的位置长度
创新互联是一家专注于成都网站制作、网站建设、外贸网站建设与策划设计,高陵网站建设哪家好?创新互联做网站,专注于网站建设十余年,网设计领域的专业建站公司;建站业务涵盖:高陵等地区。高陵做网站价格咨询:18982081108
Dim str As String = "16461了工有6149夺中46146好31"
Label1.Text = Mid(str, str.Length - 3, 3) '取字符串最后3位数
Label2.Text = Mid(str, 1, 3) '取字符串前面3位数
substring 就是对一个指定的字符窜进行字符窜截取的方法。
运用的形式差不多如下：
截取后的字符窜 = 指定字符窜.substring（开始截取位置[第一位从0开始],截取长度）
Dim str As String = "dsk_cy"
Dim resultStr As String = str.substring(0,2)'截取最左边的两个字符 即 resultStr = “ds”
Dim reulst As String = str.substring(1,2) '截取从最左边数第二位开始的两个字符 即 result = “sk”
｛“Xm”：“李明”，“Dh”：“123456”，“Nl”：“30”｝这是个JSON串，在序列化后，可以得到值。你可以使用System.Web.Script.Serialization.JavaScriptSerializer类来完成任务。也可以利用第三方工具比如：Newtonsoft.Json.dll等，来完成任务。
如何使用System.Web.Script.Serialization.JavaScriptSerializer类或第三方工具，网上有大量代码，或参阅微软在线帮助。这里就不贴了。
方法和详细的操作步骤如下：
1、第一步，删除字符串C两端的空格，见下图，转到下面的步骤。
2、第二步，完成上述步骤后，截取C的最左边的n个字符，见下图，转到下面的步骤。
3、第三步，完成上述步骤后，截取C的最右侧n个字符，见下图，转到下面的步骤。
4、第四步，完成上述步骤后，从C中的第m个字符截取n个字符，见下图，转到下面的步骤。
5、第五步，
完成上述步骤后，返回C中包含的字符数，汉字中的空格算作一个字符，见下图，转到下面的步骤。
6、第六步，
完成上述步骤后，将C中的大写字母变为小写字母，见下图，转到下面的步骤。
7、第七步，完成上述步骤后，将C中的小写字母转换为大写字母，见下图。这样，就解决了这个问题了。
很简单
Dim s As String = "1,2,3,4,5"
Dim a As String() = s.Split(",")
a就是包含所有数字的数组啦，祝你好运。