Hex(ascw(Strone)Mid(Str,i,1)Hex(ascw(Strone)Mid(Str,i,1)解释一下这两个方法是什么意思,谢谢'解释下循环里没行实现的功能,谢谢'functionzhstr(Str)dimidimStronedimStrunicodefori=1tolen(Str)Strone=

Question

Hex(ascw(Str_one) Mid(Str,i,1)
Hex(ascw(Str_one)
Mid(Str,i,1)
解释一下这两个方法是什么意思,谢谢
'解释下循环里没行实现的功能,谢谢'
function zh_str(Str)
dim i
dim Str_one
dim Str_unicode
for i=1 to len(Str)
Str_one=Mid(Str,i,1)
Str_unicode=Str_unicode&chr(38)
Str_unicode=Str_unicode&chr(35)
Str_unicode=Str_unicode&chr(120)
Str_unicode=Str_unicode& Hex(ascw(Str_one))
Str_unicode=Str_unicode&chr(59)
next

Str=Str_unicode
zh_str = Str
end function

Answer 1

ASCW是把变量Str_one转化为十进制数
Hex()是把十进制数换算成16进制数
Mid()是把Str从i个位置取1个字符给变量.