六月婷婷综合激情-六月婷婷综合-六月婷婷在线观看-六月婷婷在线-亚洲黄色在线网站-亚洲黄色在线观看网站

明輝手游網中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

將字符串分段,取得每段內容

[摘要]在vb或者vb.net編程的時候,我們可能把一些值是放在這樣的格式里面的.”123-456-123-456-123-456-123”,而不是把放在數組里面的.這種情況實際上是比較常見的.筆者所在的公司,開發的網頁或者是window應用中,經常從一個頁面要傳遞很多的值到另外一個頁面,而且值的多少也不...
在vb或者vb.net編程的時候,我們可能把一些值是放在這樣的格式里面的.”123-456-123-456-123-456-123”,而不是把放在數組里面的.這種情況實際上是比較常見的.筆者所在的公司,開發的網頁或者是window應用中,經常從一個頁面要傳遞很多的值到另外一個頁面,而且值的多少也不知道,就經常用這種方法來實現.

在得到這樣一個字符串時候,還要把解開.得到每一個段的值,這就要求把字符串分段,取得每一段的內容的問題了.如下就是筆者在開發中用到的一個函數.vb6或者是vb.net上成功編譯.如果你在實際應用中也有這樣的要求,未嘗不可一試.

‘autor:lyxer

‘email:[email protected]

'將字符串分段,取得每段內容

Public Function Get_Token(ByRef sSource As String, ByVal sSeparator As String)

Dim P As Integer

Dim sRet As String

P = InStr(sSource, sSeparator)

If P = 0 Then

sRet = sSource

sSource = ""

Else

sRet = Mid(sSource, 1, P - 1)

sSource = Right(sSource, Len(sSource) - P)

End If

Get_Token = sRet

End Function




在使用的時候,你要注意, sSource必須要放在一個變量里面,不要把設成某一個空間的caption或者試text屬性值,因為這個值是在變化的.




主站蜘蛛池模板: 色综合久久夜色精品国产 | 青青国产成人久久91网 | 欧美一级大黄 | 日本人视频网站 | 欧美最猛性 | 日本乱中文字幕系列在线观看 | 日本免费网站在线观看 | 中文字幕在线免费观看视频 | 深爱激情小说网 | 亚洲视色 | 亚洲黄色一区二区 | 天天草综合网 | 五月六月丁香 | 天天综合亚洲 | 青春草视频在线播放 | 色老大综合久久综合热 | 午夜影视在线观看免费完整高清大全 | 天天操天天射天天爽 | 色先锋资源站 | 午夜免费看片 | 手机看片自拍自拍 | 天天狠天天透天天伊人 | 伊人色综合7777 | 亚洲视频免费在线播放 | 亚洲天堂91 | 亚洲最稳定资源在线观看 | 亚洲va韩国va欧美va | 在线免费观看韩国a视频 | 亚洲va中文va欧美va爽爽 | 伊人网在线免费观看 | 在线波多野结衣 | 日韩中文字幕在线有码视频网 | 天天插天天狠 | 天天做天天爱天天一爽一毛片 | 天天影视色香欲 | 日日操狠狠操 | 亚洲国产成人资源在线桃色 | 四虎4545www国产精品 | 日韩免费福利视频 | 四川农村女人一级毛片 | 依人在线 |