如何正确显示数据库里同时存在的GB码和BIG5码？
更新时间：2006年11月16日 00:00:00 作者：
Public Function CheckBIG(strSource As String) As Boolean
Dim idx As Long
Dim ByteTemp() As Byte
CheckBIG = False
For idx = 1 To Len(strSource)
ByteTemp = StrConv(Mid(strSource, idx, 1), vbFromUnicode)
If UBound(ByteTemp) > 0 Then
If (ByteTemp(1) >= 64) And (ByteTemp(1) <= 126) Then
CheckBIG = True
Exit For
End If
End If
Next idx
End Function
相关文章
如何控制弹出一个NTLM验证窗口？...2006-11-11
如何创建Word文件？...2006-11-11
如何对用户进行授权？...2006-11-11
如何取得服务器上的用户组列表？...2006-11-11
如何创建一个PDF文件？...2006-11-11
如何决定是否将登录内容保存到Cookie里？...2006-11-11
如何在网站中插播广告？...2006-11-11
如何制作一个防止多次刷新计数的图片计数器？...2006-11-11
如何远程读取数据库页面？...2006-11-11
这篇文章主要为大家介绍了字节跳动解决SLA治理难题的了解，有需要的朋友可以借鉴参考下，希望能够有所帮助，祝大家多多进步，早日升职加薪2022-05-05
最新评论