VB5里面实现VB6的InstrRev()和Split()一样的替换函数
2016-07-27
50
VB5里面实现VB6的InstrRev()和Split()一样的替换函数2008-04-17Private Function split_vb5(ByVal sstr As String, spstr As String) As VariantDim starstr, lenstr, cur As IntegerDim backstr() As Stringstarstr = InStr(sstr, spstr)cur = starstr + 1lenst...