vb.net 分割字符串

Function a(s As String) As String

成都創(chuàng)新互聯(lián)專注于雷州網(wǎng)站建設(shè)服務(wù)及定制，我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗。 熱誠為您提供雷州營銷型網(wǎng)站建設(shè)，雷州網(wǎng)站制作、雷州網(wǎng)頁設(shè)計、雷州網(wǎng)站官網(wǎng)定制、成都微信小程序服務(wù)，打造雷州網(wǎng)絡(luò)公司原創(chuàng)品牌,更為您提供雷州網(wǎng)站排名全網(wǎng)營銷落地服務(wù)。

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

基本上不出錯了

VB.NET 字串用換行分割

假設(shè)你要分割的字符串是string1的話

分割代碼就是：

dim s as string=strings.split(string1,vbcrlf)

這樣s就是一個陣列了。s(0)是第一段內(nèi)容，s(1)是第二段內(nèi)容，以此類推。~~

googles8 的寫法也對的。不過我的代碼省去了聲明的一行。只用一行就好了。

Vb.net 怎樣將split分割的字符串放進數(shù)組

有些文本中的換行符不一定是vbCrLf，也有可能是vbCr或vbLf，你可以這樣試試：

a = split(textbox1.text, vbcr)

或

a = split(textbox1.text, vblf)

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",?".")?'以.分割內(nèi)容

'a1(0)為需要獲取的字符串，路徑中不能存在兩個點或以上

‘第三種

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

a2?=?a2.Substring(0,?a2.Length?-?5)?'擴展名長度固定，路徑中可以存在多個點

' a2?=?a2.Substring(0,?InStr(a2,?".")?-?1)?'不知擴展名的長度，路徑中不能存在多個點

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