用VB把字符转换为ASCII ascii转换为字符 如何将vb中的字符串转换成ascii码

\u600e\u4e48\u628aVB\u4e2d\u7684\u628aASC\u7801\u8f6c\u6362\u6210\u5b57\u7b26

Asc(string)
\u8fd4\u56de\u503c\uff1a Integer
\u8fd4\u56de\u5b57\u7b26\u4e32\u4e2d\u7b2c\u4e00\u4e2a\u5b57\u7b26\u7684\u5b57\u7b26\u4ee3\u7801\u3002
\u63d0\u793a: Chr \u51fd\u6570\u53ef\u4ee5\u5c06\u4e00\u4e2aAscii\u7801\u8f6c\u6362\u4e3a\u76f8\u5bf9\u5e94\u7684\u5b57\u7b26

Dim i As Integer, str As String, ascstr As String
str = InputBox("\u8bf7\u8f93\u5165\u5b57\u7b26\u4e32")
For i = 1 To Len(str)
ascstr = ascstr & CStr(Asc(Mid(str, i, 1)))
Next i
Print ascstr

可使用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)   ' 返回 符。


一、字符转ASCII码:code=ASC(strCHAR)
二、ascii转字符:strChar=CHR(code)

源码介绍: 任意字符的ASCII码转换工具,基于VB6的源代码,可以把任意字符(数字、字母、汉字)转化成ascii码,也可以把ascii码还原成最初的字符。转化后的的结果(注:每个字符之间用“/”间隔开)。
使用说明:一共三个大文本框,你也可以在第二个文本框输入ASCII码,点击还原后会还原回原来的内容,注意填写格式:/1/2/3/4
原理:举个例子,用asc("你")把“你”转化成ASCII码的值为:-15133 , 用chr("-15133")把ASCII码值还原成“你”
Mid("hello", 5, 1),这个意思是:取hello中的值,5代表从第五个开始取,1代表取的值的长度。

下个软件,我学的不是本专业,没看懂,。

扩展阅读:非ascii字符怎么解决 ... 标准ascii码表图 ... ascii与汉字转换表 ... vb ascii码对照表 ... 在下列字符中其ascii ... vb ascii码转换 ... 如何把ascii码转成字符 ... ascii在线编码转换工具 ... c怎么把字母转换成ascii码 ...

本站交流只代表网友个人观点,与本站立场无关
欢迎反馈与建议,请联系电邮
2024© 车视网