将字符串分段,取得每段内容

在VB或VB.NET编程中,常见将值以特定格式字符串存储,而非数组。如公司开发网页或Windows应用时,常从一个页面传递多个未知数量的值到另一页面。得到该字符串后需分段取值,文中给出开发中使用的函数,编译成功,并提醒使用时变量设置注意事项。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

vb或者vb.net编程的时候,我们可能把一些值是放在这样的格式里面的.”123-456-123-456-123-456-123”,而不是把放在数组里面的.这种情况实际上是比较常见的.笔者所在的公司,开发的网页或者是window应用中,经常从一个页面要传递很多的值到另外一个页面,而且值的多少也不知道,就经常用这种方法来实现.

在得到这样一个字符串时候,还要把解开.得到每一个段的值,这就要求把字符串分段,取得每一段的内容的问题了.如下就是笔者在开发中用到的一个函数.vb6或者是vb.net上成功编译.如果你在实际应用中也有这样的要求,未尝不可一试.

‘autor:lyxer

‘email:l_yx123@sina.com.cn

'将字符串分段,取得每段内容

    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属性值,因为这个值是在变化的.

 

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值