如何正確顯示數(shù)據(jù)庫(kù)里同時(shí)存在的GB碼和BIG5碼？
更新時(shí)間：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
相關(guān)文章
如何編寫(xiě)一個(gè)過(guò)濾掉HTML代碼的函數(shù)？
如何編寫(xiě)一個(gè)過(guò)濾掉HTML代碼的函數(shù)？...2006-11-11
如何防止未經(jīng)注冊(cè)的用戶繞過(guò)注冊(cè)界面直接進(jìn)入應(yīng)用系統(tǒng)？
如何防止未經(jīng)注冊(cè)的用戶繞過(guò)注冊(cè)界面直接進(jìn)入應(yīng)用系統(tǒng)？...2006-11-11
如何編寫(xiě)翻頁(yè)函數(shù)？...2006-11-11
為什么用磁盤(pán)序列號(hào)加密過(guò)的代碼不能被復(fù)制安裝？
為什么用磁盤(pán)序列號(hào)加密過(guò)的代碼不能被復(fù)制安裝？...2006-11-11
問(wèn)題解析：為什么數(shù)組下標(biāo)從0?開(kāi)始而不是?1?？
這篇文章主要為大家介紹了為什么數(shù)組下標(biāo)是從0?開(kāi)始而不是?1?呢的問(wèn)題解析，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進(jìn)步，早日升職加薪2023-04-04
如何提示用戶打開(kāi)Cookie？...2006-11-11
如何實(shí)現(xiàn)在下拉菜單里輸入文字？...2006-11-11
如何利用數(shù)據(jù)庫(kù)內(nèi)容建立一個(gè)下拉式列表？
如何利用數(shù)據(jù)庫(kù)內(nèi)容建立一個(gè)下拉式列表？...2006-11-11
如何實(shí)現(xiàn)文件上傳并自動(dòng)歸類功能？
如何實(shí)現(xiàn)文件上傳并自動(dòng)歸類功能？...2006-11-11
如何在網(wǎng)站中插播廣告？...2006-11-11