摘要: 今碰到个需要对16进制的字符串进行加1的需求,写了以下函数。Private Function AddHexString(s As String) As String ReDim n(Len(s)) For i = 0 To UBound(n) - 1 n(i) = Asc(Mid(s, Len(s)... 阅读全文
posted @ 2015-04-20 09:50 龙爷 阅读(710) 评论(0) 推荐(0) 编辑