怎么判断一个字符是中文?(在线等，解决马上散分)

Question

怎么判断一个字符是中文?

Answer 1

if(Convert.ToInt16("中".ToCharArray()[0])>256)
Response.Write("是中文");

Answer 2

Private Sub SrcTxt_Change( )　　Static SStr As String　　Dim i As Integer　　Dim TempFile, TempFileBinary As String　　TotalNum = 0　　L = Len(SrcTxt.Text)　　For i = 1 To L　　tmpStr = StrConv(Mid$(SrcTxt.Text, i, 1), vbWide)　　If Asc(Mid$(SrcTxt.Text, i, 1)) < 0 Then　　TotalNum = TotalNum + 1　　SStr = SrcTxt.Text　　Else　　MsgBox "写入的不是汉字！"　　SrcTxt.Text = Left(SrcTxt.Text, Len(SrcTxt.Text) - 1)　　Exit Sub　　End If　　Next i　　LblNum.Caption = Str$(TotalNum) + "个汉字"　　TempFile = App.Path + "\" + "TempSrc.txt"　　'TempFileBinary = App.Path + "\" + "TempSrcBinary.txt"　　Open TempFile For Output As #1　　Print #1, SrcTxt.Text　　Close #1　　End Sub