用VB把字符转换为ASCII ascii转换为字符

如题所述

可使用Asc 函数将字符转换为ASCII,使用Chr 函数将ASCII转换为字符。

Asc 函数,返回一个 Integer,代表字符串中首字母的字符代码。

Asc 函数示例

本示例使用 Asc 函数返回字符串首字母的字符值(ASCII 值)。

Dim MyNumber
MyNumber = Asc("A")   ' è¿”回 65。
MyNumber = Asc("a")   ' è¿”回 97。
MyNumber = Asc("字符")   ' è¿”回 -10282。

Chr 函数,返回 String,其中包含有与指定的字符代码相关的字符 。

Chr 函数示例

本示例使用 Chr 函数来返回指定字符码所代表的字符。

Dim MyChar
MyChar = Chr(65)   ' è¿”回 A。
MyChar = Chr(97)   ' è¿”回 a。
MyChar = Chr(62)   ' è¿”回 >。
MyChar = Chr(-18437)   ' è¿”回 ç¬¦ã€‚
温馨提示:答案为网友推荐,仅供参考
第1个回答  2010-12-10
一、字符转ASCII码:code=ASC(strCHAR)
二、ascii转字符:strChar=CHR(code)
第2个回答  2010-12-01
源码介绍: 任意字符的ASCII码转换工具,基于VB6的源代码,可以把任意字符(数字、字母、汉字)转化成ascii码,也可以把ascii码还原成最初的字符。转化后的的结果(注:每个字符之间用“/”间隔开)。
使用说明:一共三个大文本框,你也可以在第二个文本框输入ASCII码,点击还原后会还原回原来的内容,注意填写格式:/1/2/3/4
原理:举个例子,用asc("你")把“你”转化成ASCII码的值为:-15133 , 用chr("-15133")把ASCII码值还原成“你”
Mid("hello", 5, 1),这个意思是:取hello中的值,5代表从第五个开始取,1代表取的值的长度。

下个软件,我学的不是本专业,没看懂,。本回答被网友采纳