vb.net字符串剪切字符串赋值给变量

提示：扫一扫查出行
【扫一扫了解最新限行尾号】
复制提示

vb.net 分割字符串

Function a(s As String) As String

Dim i = s.IndexOf("/")

If i 0 Then

Return s.Substring(0, i)

ElseIf i = 0 Then '第一个字符为"/"

If s.LastIndexOf("/") 0 Then '不只一个"/"

Return s.Substring(0, s.Substring(1).IndexOf("/") + 1)

Else

Return Nothing '只有一个"/"

End If

Else '不含"/"或是空串

Return Nothing

End If

End Function

基本上不出错了

相关问答

Q1: vb.net 里的substring()有什么作用？应该怎么用？

substring 就是对一个指定vb.net字符串剪切的字符窜进行字符窜截取vb.net字符串剪切的方法。

运用的形式差不多如下vb.net字符串剪切：

截取后的字符窜 = 指定字符窜.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”

Q2: Vb.net 字符串截取

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

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

Q3: VB.net 字符串分割的问题

‘第一种

Dim a As String = IO.Path.GetDirectoryName("D:\项目\0913 \test.text") "\" IO.Path.GetFileNameWithoutExtension("D:\项目\0913 \test.text")

’第二种

Dim a1() As String = Split("D:\项目\0913 \test.text", ".") '以.分割内容

'a1(0)为需要获取的字符串，路径中不能存在两个点或以上

‘第三种

Dim a2 As String = "D:\项目\0913 \test.text"

a2 = a2.Substring(0, a2.Length - 5) '扩展名长度固定，路径中可以存在多个点

' a2 = a2.Substring(0, InStr(a2, ".") - 1) '不知扩展名的长度，路径中不能存在多个点

’如果必要，建议用第一种，不受任何限制