| 如何判断字符串中包含双字节字符 |
|
| 作者：zhuyiwen… 文章来源：ACCESS XP FAQ 点击数： 本日：{$DayHits} 更新时间：2005-6-9 11:52:05 |
|
如何判断字符串中包含双字节字符
作 者：朱亦文
发布日期：2005年6月9日
摘 要：判别字符串是否包含中文或其它非ASCII字符串的函数HasWideChr。
往往我们要判断字符串中是否包含了中文字符，我们用下面这个函数HasWideChr可以做到。
正 文：
（问）：如何判断字符串中包含双字节字符，例如中文字符？
（答）：往往我们要判断字符串中是否包含了中文字符，我们用下面这个函数HasWideChr可以做到。
将下列代码粘贴到一个新模块中，调用函数HasWideChr即可。
Public Function HasWideChr(ByVal str As String) As Boolean
' 判别字符串是否包含中文或其它非ASCII字符串的函数HasWideChr
' 作者：朱亦文
' 日期：2005.06.09
Dim ByteGB() As Byte
Dim LenW As Integer
ByteGB = StrConv(str, vbFromUnicode)
LenW = UBound(ByteGB) + 1
HasWideChr = Len(str) <> LenW
End Function
|
|
| 文章录入：zhuyiwen 责任编辑：tm |
|
上一篇文章： 学习VBA的法宝
下一篇文章： 关于在ACCESS中使用activeX控件的一个心得体会 |
| 【字体：小 大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
用户登录 
新用户注册 
网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）
