189 8069 5689
Private Sub Form_Load()
北海网站建设公司成都创新互联,北海网站设计制作，有大型网站制作公司丰富经验。已为北海上千多家提供企业网站建设服务。企业网站搭建\成都外贸网站建设公司要多少钱，请找那个售后服务好的北海做网站的公司定做！
s = "123456"
n = 3 '从第三个字符
j = 2 '向左截取2个
For i = n To 1 Step -1
l = l + 1
ss = ss Mid(s, i, 1)
ss1 = Mid(s, i, 1) ss1
If l = j Then Exit For
Next
MsgBox ss
msgbox ss1
End Sub
VB.net里有Split函数吗？
我的思路是，先寻找http://字符，然后向后寻找第一个在链接中肯定不会出现的字符，比如 ' " ; , 等等，截取中间这段就行啦
比如
doiicfur utiyo:('')bur;
先查找"http://",发现在第19个字符处（一定要注意，VB.net第一个字符的索引值下标为0，所以h是第20个字母，搜索所得到的结果就是19）
然后从19向后搜索异常字符（ " ' ; , ）之类，得到第二个搜索结果，将这两个结果中间的部分截取就是链接啦
使用mid函数 参数1是文本内容 参数2是起始位置 参数3是截取的数量
Private Sub Command1_Click()
MsgBox Mid(Text1.Text, Val(Text2.Text), Val(Text3.Text) - Val(Text2.Text) + 1)
End Sub
你自己的代码问题是 参数3 题目说到第几个字符 你应该是用这个数减去起始位置+1 才是数量
因为不一定从第一个开始
｛“Xm”：“李明”，“Dh”：“123456”，“Nl”：“30”｝这是个JSON串，在序列化后，可以得到值。你可以使用System.Web.Script.Serialization.JavaScriptSerializer类来完成任务。也可以利用第三方工具比如：Newtonsoft.Json.dll等，来完成任务。
如何使用System.Web.Script.Serialization.JavaScriptSerializer类或第三方工具，网上有大量代码，或参阅微软在线帮助。这里就不贴了。
使用InStr函数和InStrRev得到“”的位置，如果有多个“”，计算出相邻两个的位置，再使用Mid函数截取。
PS：多个“”的话，InStr函数和InStrRev这两个函数都要使用。
System.IO.Path.GetExtension("c:\windows\test.txt")'获取扩展名
System.IO.Path.GetFileName("c:\windows\test.txt")'获取文件名
System.IO.Path.GetDirectoryName("c:\windows\test.txt")'获取文件夹