如何用VB代码求汉字Ascii值

用这个asc()函数好像只能求一个字节的符号。如果拿去求汉字的话会出现负的值。大家把答案写清楚点,我是初学者。还有你们最好先用&#+Ascii值试验下行不行?2楼的比如说... 用这个asc()函数 好像只能求一个字节的符号。如果拿去求汉字的话会出现负的值。
大家把答案写清楚点,我是初学者。 还有你们最好先用&#+Ascii值试验下行不行?
2楼的 比如说&# 30334 百 &# 24230 度 &# 33150腾 &# 35759 讯 先把中间的空格去掉
展开
 我来答
GuduTianIT
2008-11-03 · TA获得超过380个赞
知道小有建树答主
回答量:397
采纳率:75%
帮助的人:217万
展开全部
ascii码?国标码我听过 还没听过汉字有ascii的
wwylele
2008-11-03 · TA获得超过2523个赞
知道小有建树答主
回答量:1037
采纳率:0%
帮助的人:1085万
展开全部
在用绝对值函数abs()去绝对值
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
zdingyun
2008-11-03 · 知道合伙人软件行家
zdingyun
知道合伙人软件行家
采纳数:15429 获赞数:48172
1982年上海业余工业大学化工系毕业 现退休

向TA提问 私信TA
展开全部
Private Sub Command1_Click()
Text1 = Asc("汉") '显示-17734
Text2 = Chr(Val(Text1)) '显示汉
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
XOooZzz
2008-11-03 · TA获得超过813个赞
知道小有建树答主
回答量:672
采纳率:0%
帮助的人:402万
展开全部
是负的没错!
如果你非要正的,可以这样
dim ascii as long
ascii=clng(asc("正")) and &hffff&
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式