超级高分(我所有的分) 求 [将一个键盘按键字符比如"A"转换为10进制]!!!

Question

MSDN：
 
Asc 函数
      返回一个 Integer，代表字符串中首字母的字符代码。语法Asc(string)必要的 string 参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符，则会产生运行时错误。说明在非 DBCS 系统下，返回值范围为 0 – 255 。在 DBCS 系统下，则为 -32768 – 32767。注意    AscB 函数作用于包含在字符串中的字节数据，AscB 返回第一个字节的字符代码，而非字符的字符代码。AscW 函数返回 Unicode 字符代码，若平台不支持 Unicode，则与 Asc 函数功能相同。

Answer 1

private function GetStringAsc(Str as string)as integer
    GetStringAsc=Asc(str)
end subi=GetStringAsc("A")

Answer 2

转化为 十进制： ASC("A")
转化为 八进制： OCT(ASC("A"))
转化为 十六进制： Hex(Asc("A"))

Answer 3

s$ = "A"
MsgBox CLng("&H" + s$)

Answer 4

兄台要的可是字符的ascii？
ascii码可用asc函数得到（中文不行）
dim i as integer
dim s as string
s="a"
i=asc(a)
具体内容msdn里有解释

Answer 5

发分了。。首先要非常谢谢大家了。。原来这么简单呀。。大家帮了我的忙不过再发分前我也要分析一下，好吗
第一个回复我问题得朋友，答案实际上已经出来了，嗯。。帮了我60%吧（实际上已经事90%了，只是，后面还有好多，对不起了，你不介意吧：-）
所以，得60分，抱歉呀我总共只有100分呀，，帮了我这么大的忙！！第2位朋友，caferd(金兰) ，你帮我写了一个函数，我又学到一点，算帮了我20%吧。所以，得20分，够了吗第3位朋友，sonicdater(发呆呆(我答问题*不吵架*因为我呆)) ，你得方法沃知道，所以15分吧。第4位朋友，得5分最后那位帅哥服了U了。。无分！：-）好了，再次谢谢了。