贵州 民营经济:请问一下这个自定义的函数是啥意思!

来源:百度文库 编辑:高考问答 时间:2024/04/30 00:47:01
Function getByteString(StringStr)
For i=1 to Len(StringStr)
char=Mid(StringStr,i,1)
getByteString=getByteString & chrB(AscB(char))
Next
End Function

其中调用这个函数的语句如下:
getbytestring(chr(13) 或 getByteString("--")
这个函数的做用是什麼啊?谢谢

Function getByteString(StringStr) //定义一个getByteString的函数
For i=1 to Len(StringStr) //一个循环 1到StringStr(字符长度)
char=Mid(StringStr,i,1) //char赋值为:依次从i开始到字符结束
getByteString=getByteString & chrB(AscB(char)) //getByteString赋值为:getByteString & 返回与指定的 ANSI 字符代码相对应的更改为单字节的char
Next
End Function

整个函数的功能就是这些:单字节的ANSI转变