VB小技巧：在VB中显示常用的符号（如欧元、人民币、正负号、度等）

相信不少人知道这样一个技巧，在VB中要显示一些特殊的符号（如欧元、人民币、正负号、度等），都是在利用输入法的功能，在代码中敲入￠、￥、±、°，这样一般情况下是没有问题的，但如果您的软件卖的特别好，老外也很感兴趣，这下好了，老外一运行，这些符号全变成了乱码（不信的可以去试一下）。

 

那么有不有办法可以既在中文环境下显示这样的符号，也可以在英文环境下不是乱码呢？

 

答案是肯定的。VB中有一个函数叫ChrW，Chr 的有效范围是 0 到 255，而ChrW 的有效范围是 -32768 到 65535。

 

你可以写个循环，把这些字符都显示出来，例如：

 

Dim s As String For i = 128 To 255 s = s & i & " " & ChrW(i) & vbCrLf Next Text1.Text = s '本文于2009年07月03日首次发表于CSDN博客，转载请注明出处：http://blog.csdn.net/snowdust

 

下面列出一些常见的字符及对应的序号，感兴趣的朋友不妨试试。

 

162 ￠
163 ￡
164 ¤
165 ￥
166 |
167 §
168 ¨
176 °
177 ±

183 ·

192 à
193 á
200 è
201 é
202 ê
204 ì
205 í

210 ò
211 ó
215 ×
217 ù
218 ú
220 ü
221 Y

224 à
225 á
226 a
232 è
233 é
234 ê
236 ì
237 í

242 ò
243 ó
247 ÷
249 ù
250 ú
252 ü

 

--本文于2009年07月03日首次发表于CSDN博客，转载请注明出处：http://blog.csdn.net/snowdust