2009年4月14日
无组件上传实例教程
摘要： 127) Then '字节高位为0,表示英文字符 s = s + Chr(t) Else i = i +1 '当为汉字时,取第二个字节 t1 = AscB(MidB(Str1r,i,1)) s = s + Chr(t * 256 + t1) '将汉字两字节外码组合成ANSI码 End If Next GetText = s End Function '将字符... 阅读全文
posted @ 2009-04-14 10:58 Atom Yan 阅读(270) 评论(0) 推荐(0) 编辑