Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 4490|回复: 9

[已解决]汉字转拼音的那个vba excel的 有什么作用嘛?

[复制链接]
发表于 2011-5-26 16:06 | 显示全部楼层 |阅读模式
前些天 我下载了这类的excel  我看不懂 我不知道那是用来噶么的
为什么我写我名字 柯媛媛的时候  会出来的是ke媛媛呢
我打别的 都是汉字变成拼音了

最佳答案
2011-5-27 09:02
回复 个蛋猪 的帖子

Asc 函数
请参阅     示例     特性
返回一个 Integer,代表字符串中首字母的字符代码
语法
Asc(string)
必要的 string 参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符,则会产生运行时错误
说明
在非 DBCS 系统下,返回值范围为 0 – 255 。在 DBCS 系统下,则为 -32768 – 32767。
注意 AscB 函数作用于包含在字符串中的字节数据,AscB 返回第一个字节的字符代码,而非字符的字符代码。AscW 函数返回 Unicode 字符代码,若平台不支持 Unicode,则与 Asc 函数功能相同。

Asc函数返回的数字在  -32768 – 32767
而你的代码:Dim ardata(-20319 To -10247) As String   这个区域远比 Asc 函数返回的数字区域小很多。。
所以又很多汉子返回数字后是找不到结果的。。也就是拼音代码区域小了。。所以有些汉子就找不到结果,也就返回不了想要的拼音了。
未命名.jpg
发表于 2011-5-26 16:59 | 显示全部楼层
回复

使用道具 举报

发表于 2011-5-26 17:45 | 显示全部楼层
回复 个蛋猪 的帖子

这个要看源代码才知道那里有错了。
回复

使用道具 举报

发表于 2011-5-26 19:42 | 显示全部楼层
媛 这个字 转换失败要看一下代码
回复

使用道具 举报

 楼主| 发表于 2011-5-27 08:43 | 显示全部楼层
回复 sunjing-zxl 的帖子

附件在这 代码 你们看下 里面我也有看到yuan 的代码在 就不知道怎么会还是汉字 不是拼音出来

( HYY514 分享)汉字转全拼音函数.rar

13.17 KB, 下载次数: 24

回复

使用道具 举报

 楼主| 发表于 2011-5-27 08:45 | 显示全部楼层
回复 mxg825 的帖子

这个  是附件 你看看代码吧

( HYY514 分享)汉字转全拼音函数.rar

13.17 KB, 下载次数: 27

回复

使用道具 举报

发表于 2011-5-27 09:02 | 显示全部楼层    本楼为最佳答案   
回复 个蛋猪 的帖子

Asc 函数
请参阅     示例     特性
返回一个 Integer,代表字符串中首字母的字符代码
语法
Asc(string)
必要的 string 参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符,则会产生运行时错误
说明
在非 DBCS 系统下,返回值范围为 0 – 255 。在 DBCS 系统下,则为 -32768 – 32767。
注意 AscB 函数作用于包含在字符串中的字节数据,AscB 返回第一个字节的字符代码,而非字符的字符代码。AscW 函数返回 Unicode 字符代码,若平台不支持 Unicode,则与 Asc 函数功能相同。

Asc函数返回的数字在  -32768 – 32767
而你的代码:Dim ardata(-20319 To -10247) As String   这个区域远比 Asc 函数返回的数字区域小很多。。
所以又很多汉子返回数字后是找不到结果的。。也就是拼音代码区域小了。。所以有些汉子就找不到结果,也就返回不了想要的拼音了。
回复

使用道具 举报

发表于 2011-5-27 09:07 | 显示全部楼层
本帖最后由 sunjing-zxl 于 2011-5-27 09:09 编辑

回复 个蛋猪 的帖子

举一个例子:比如你附件中的 “赅”
用Asc计算出来是 -5408  而这个数字在  -20319 ~ -10247  中是找不到结果的。所以不能返回拼音

再比如你的 媛 字  返回的是  -6462  也同样找不到结果

回复

使用道具 举报

发表于 2011-5-27 09:08 | 显示全部楼层
换一个吧,这一类的不少
回复

使用道具 举报

发表于 2014-1-23 17:25 | 显示全部楼层
谢谢分享
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-17 07:46 , Processed in 0.308266 second(s), 11 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表