vb 字符串和数字相互转换函数

Posted 2020-07-25 phzend

VB中的字符串函数比较多,也比较方便,就不一一介绍了.本文主要对字符串相关的
转换函数做一些小结.字符串转换的函数主要有:
Str()和Val()用于字符串和数字的相互转换;
Chr()和Asc()用于字符串和AscII码的相互转换;
Chrw()和Ascw()用于Unicode码和中文的相互转换;
Format()函数用途十分广泛的一个函数,功能十分强大.

在这些函数中前两对和Format()函数是我们经常用到的,这里只给出前两对的几个简单例子:
(1) MyString = Str(-459.65) ‘ 返回 "-459.65"。
MyString = Str(459.001) ‘ 返回 " 459.001"。
(2) MyValue = Val(" 2 45 7") ‘ 返回 2457。
MyValue = Val("24 and 57") ‘ 返回 24。
(3) MyChar = Chr(97) ‘ 返回 a。
MyChar = Chr(37) ‘ 返回 %。
(4) MyNumber = Asc("Apple") ‘ 返回 65。
MyNumber = Asc("a") ‘ 返回 97。

Format函数功能十分强大,大家可以察看msdn相关说明.本文重点想说一下第三对函数,这是经常被大家忽视的一对函数.在我开发手机短信时,最开始时就是用text模式开发的,后来由于发中文改成pdu模式,pdu模式有三种形式可用:7-bits,8-bits,ucs2.前两种都是表复杂的,涉及到编码函数的设计,这里就不多说了,我用的是ucs2编码,发现只要使用第三对函数就能完成pdu串的编码和解码.这对函数的使用和第二对完全相同,下面举几个例子说明(以下代码从vb的立即窗口里得到):
?ascw("中")
20013
?ascw("果")
26524
?ascw("e")
101
?chrw(101)
e
?chrw(26589)
柝
在chrw()和ascw()函数中,对于ASCII仍然和chr()与asc()相同对待.以上只是我对这些函数使用时的一点小结,期望能起到抛砖引玉的作用.