vb 中怎樣判斷輸入的字符是否是漢字

0ascii255

站在用戶的角度思考問題，與客戶深入溝通，找到梅州網(wǎng)站設(shè)計與梅州網(wǎng)站推廣的解決方案，憑借多年的經(jīng)驗(yàn)，讓設(shè)計與互聯(lián)網(wǎng)技術(shù)結(jié)合，創(chuàng)造個性化、用戶體驗(yàn)好的作品，建站類型包括：成都做網(wǎng)站、網(wǎng)站建設(shè)、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣、域名注冊、網(wǎng)絡(luò)空間、企業(yè)郵箱。業(yè)務(wù)覆蓋梅州地區(qū)。

我來補(bǔ)充一下代碼吧,在form中加入一個Text1

Private Sub Text1_Change()

If Text1.Text = "" Then Exit Sub '如果是空字符串,就退出此過程

Dim a

a = Asc(Mid(Text1.Text, Len(Text1.Text), 1))

If a 255 Or a 0 Then MsgBox "剛才輸入的是漢字" Else MsgBox "剛輸入的是字符"

End Sub

這是靠ASCII碼來判斷的,你根據(jù)你的程序需要進(jìn)行修改吧,這是對輸入框約束輸入的比較常用的方法之一,你可以去搜索一下英文字符ASCII碼表.

vb中，如何判斷一個字符串是漢字還是英文

你可以用mid截取單個字符并用ASCII碼判斷：

n=asc(mid(str1,i,1))

if n0 and n255 then

'英文字母

else

'中文

end if

整個字符串你可以循環(huán)判斷。

這是一個比較粗糙的范圍，更加精準(zhǔn)的判斷：33-126為可打印的（即可顯示的）英文字符，97-122為英文字母（小寫），你可以根據(jù)字符串的實(shí)際內(nèi)容來采用判斷依據(jù)；負(fù)數(shù)是漢字（其實(shí)是最高位為1，VB識別為負(fù)數(shù)，轉(zhuǎn)換成16進(jìn)制就可以看到正確的編碼了）

vb.net怎么判斷一個字符串中是否包含漢字

str = "hello,everybody. " 返回false，位置0。（不含漢字和漢語標(biāo)點(diǎn)符號）

str = "hello,ererybody。 " 返回false，位置16。（最后一個句號是漢語標(biāo)點(diǎn)符號）

先謝過大家了！

新聞名稱：vb.net漢字判斷 vb判斷字符串
鏈接URL：http://www.chinadenli.net/article14/dohicge.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供移動網(wǎng)站建設(shè)、面包屑導(dǎo)航、企業(yè)網(wǎng)站制作、品牌網(wǎng)站設(shè)計、網(wǎng)站設(shè)計、靜態(tài)網(wǎng)站

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)