谁帮我检查一下这个方法哪里错了???

Question

本帖最后由 hack_bxc 于 2012-01-08 22:45:56 编辑

Answer 1

何苦舍近求远呢……
有现成的 Split() 函数不用。　-_-!!!
如果ByteSZ是Unicode格式的字节串，直接用就行了：
OutPutStr = Split(ByteSZ, FindStr)如果是ANSI格式的字节串，用 StrConv()转换一下就行了：
OutPutStr = Split(StrConv(ByteSZ, vbUnicode), FindStr)
另外：你不觉得你的代码中第一个 GoTo cz 是多此一举吗……

Answer 2

行还是不行，你不能试一下么…………
要注意的是 Split() 的返回值只能赋给动态数组。