专注收集记录技术开发学习笔记、技术难点、解决方案
网站信息搜索 >> 请输入关键词:
您当前的位置: 首页 > vbScript

求用vbs转字符串为16进制数组方法解决方案

发布时间:2010-05-20 14:01:29 文章来源:www.iduyao.cn 采编人员:星星草
求用vbs转字符串为16进制数组方法
有一个字符串 比如为str = "abababababababababab", 想把它转换为一个16进制的10个元素的数组a[10] = {0xab,0xab,0xab,0xab,0xab,0xab,0xab,0xab,0xab,0xab},求问高手如何操作

------解决方案--------------------
VBScript code
str = "abababababababababab"
str2 = ""
For i=1 To Len(str) Step 2
    If str2 = "" Then
        str2 = Mid(str,i,2)
    Else
        str2 = str2 & "," & Mid(str,i,2)
    End If 
Next 
ar = Split(str2,",")
For i=0 To UBound(ar)
    ar(i) = Hex(clng("&h" & ar(i)))
Next
友情提示:
信息收集于互联网,如果您发现错误或造成侵权,请及时通知本站更正或删除,具体联系方式见页面底部联系我们,谢谢。

其他相似内容:

热门推荐: