Asc 返回每一个字符串首字母的 ANSI 字符代码

MyNumber = Asc("A") '返回 65。

谁有全部字符的ANSI 字符代码啊~

偶这么说吧

function strlength(inputstr) dim length,i length=0 for i=1 to len(inputstr) if asc(mid(inputstr,i,1))<0 then length=length+2 else length=length+1 ‘ end if next strlength=length end function

一般的字符加1可以理解

什么情况会小于0呢~~加2~~是空格么~~应该不是

谁有这样的函数表啊~这些我都忘了

随便搞本计算机的书后面都有啊

&lt;%
   for i=1 to 255
      response.write i&amp;":"&amp;chr(i)&amp;"&amp;nbsp;  "
      if i mod 10 =0 then response.write "&lt;br&gt;"
   next
%&gt;

狂汗。。