vb.netascw的简单介绍

vb与vb.net得到汉字ASC的函数,该怎么解决

一样的还是使用asc函数就好了啊!,n=ASC(“汉”),不过汉字的asc码都是小于0的

站在用户的角度思考问题,与客户深入沟通,找到弋江网站设计与弋江网站推广的解决方案,凭借多年的经验,让设计与互联网技术结合,创造个性化、用户体验好的作品,建站类型包括:网站设计制作、网站建设、企业官网、英文网站、手机端网站、网站推广、域名与空间、网络空间、企业邮箱。业务覆盖弋江地区。

为什么VB中使用ASCW函数得到的值是负数?

因为ascw返回的数据类型是integer型,“阜阳”两个字的UNICODE码是0x961C和0x9633,即38428和38451,大于32767的上限

要得到正数的话必须定义一个long型的变量来转换

lngReturn = clng("h" hex((ascw("阜"))))

debug.print lngReturn

lngReturn = clng("h" hex((ascw("阳"))))

debug.print lngReturn

结果是

38428

38451

VB.net 如何获得中文字符串的长度?

上面思路是正确的, 用ascw 函数也可以

private function LenC( ps as string ) as Integer

Dim n As Integer

Dim StrLen As Integer

For n = 1 To Len(Text1.Text)

If Ascw(Mid(Text1.Text, n, 1)) 256 Then

StrLen = StrLen + 2

Else

StrLen = StrLen + 1

Next n

return strLen

end function


网站栏目:vb.netascw的简单介绍
标题网址:http://myzitong.com/article/doeosji.html