用途:将字符串中的全角(双字节)英文字母更改为半角(单字节)字符。
语法:ASC(text)
参数:Text为文本或包含文本的单元格引用。如果文本中不包含任何全角英文字母,则文本不会被更改。
实例:如果A1=excel,则公式“=ASC(A1)”返回excel。
比如:
打开VB软件,新建标准EXE。
建立一个图片框,名称改为A。建立一个命令按钮,caption改为按钮。
点击按钮进入代码编辑器,输入代码。
A.print "1234567890"
A.print tab(3);"mm" ;tab(7);"mm"
"1234567890"是用来确定字符位的,能清楚的看到tab函数的结果。
代码中,tab(3)所以“mm”从第三字符开始显示,tab(7)所以第二个“mm”从第七个字符位开始显示。
Asc 函数返回一个字符的ASCII码值(整型数)。例如
Dim i As Integer
i = Asc("A")
Print i '输出65,65是A的ASCII码值
x = Asc("z")
Print i '输出122,122是z的ASCII码值
' 多个字符组成的字符串作为参数时,Asc函数只求第一个
' 字符的ASCII码值, 忽略其余字符
x = Asc("abc")
Print i '输出97,97是a的ASCII码值
在中文Windows系统中,汉字是两个字节的编码,为此,VB还提供了AsCW函数,可用这个函数求取2个字节的Unicode码值。例如
Dim i As Integer
i = AscW("我")
Print i '输出25105,这是汉字'我'的Unicode码值
chr(83)
在VB中怎么把83转换回"S“?? 用 函数 chr 试试