vb.net验证中文 vbnet ui

vb中，如何判断一个字符串是汉字还是英文

你可以用mid截取单个字符并用ASCII码判断：

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

if n0 and n255 then

'英文字母

else

'中文

end if

整个字符串你可以循环判断。

这是一个比较粗糙的范围，更加精准的判断：33-126为可打印的（即可显示的）英文字符，97-122为英文字母（小写），你可以根据字符串的实际内容来采用判断依据；负数是汉字（其实是最高位为1，VB识别为负数，转换成16进制就可以看到正确的编码了）

相关问答

Q1: vb.net怎么判断一个字符串中是否包含汉字

str = "hello,everybody. " 返回false，位置0。（不含汉字和汉语标点符号）

str = "hello,ererybody。 " 返回false，位置16。（最后一个句号是汉语标点符号）

先谢过大家了！

Q2: vb.net怎么做中文语音识别程序

这就要调用API函数vb.net验证中文了

给vb.net验证中文你代码吧

记得给点分啊

Private

Const

KeysM

=

H8000

Private

Declare

Function

GetAsyncKeyState

Lib

"user32"

(ByVal

vKey

As

Long)

As

Integer

Private

Sub

TextBox1_KeyDown(ByVal

sender

As

Object,

ByVal

e

As

System.Windows.Forms.KeyEventArgs)

Handles

TextBox1.KeyDown

Me.Text

=

e.KeyValue

If

e.KeyValue

=

Keys.ShiftKey

And

GetAsyncKeyState(160)

And

KeysM

Then

MsgBox("你按vb.net验证中文的是左SHIFT")

ElseIf

e.KeyValue

=

Keys.ShiftKey

And

GetAsyncKeyState(161)

And

KeysM

Then

MsgBox("你按的是右SHIFT")

End

If

End

Sub

Q3: VB.NET怎么读取文本中的中文

指定编码为默认,这样写

Dim sr2 As IO.StreamReader = New StreamReader(("d:\辅助程序\sm.txt", System.Text.Encoding.Default)

vb.net验证中文的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet ui、vb.net验证中文的信息别忘了在本站进行查找喔。