7451
社区成员
- 主页
...全文
请发表友善的回复…
发表回复
TaoHuang 2003-12-27
Const gc_LOCALEID_TAIWAN = &H404
If Len(strCode) <> LenB(StrConv(strCode, vbFromUnicode, gc_LOCALEID_TAIWAN)) Then
msgbox("有中文")
Else
msgbox("沒有中文")
End If
If Len(strCode) <> LenB(StrConv(strCode, vbFromUnicode, gc_LOCALEID_TAIWAN)) Then
msgbox("有中文")
Else
msgbox("沒有中文")
End If