vb 如何区分汉字和字母
我自己也在写,发这希望看看大家怎么写。我的要求:比如一个字母串:str=“你好,joker”,我要区分出来汉字和字母,并就汉字和字母分开统计,n1(汉字数),n2(字母数...
我自己也在写,发这希望看看大家怎么写。
我的要求:比如一个字母串:str=“你好,joker”,我要区分出来汉字和字母,并就汉字和字母分开统计,n1(汉字数),n2(字母数)。
谢谢大家参与,我没多少悬赏,大家有不错的就给出去了。 展开
我的要求:比如一个字母串:str=“你好,joker”,我要区分出来汉字和字母,并就汉字和字母分开统计,n1(汉字数),n2(字母数)。
谢谢大家参与,我没多少悬赏,大家有不错的就给出去了。 展开
5个回答
展开全部
n=asc(字符)
根据n的大小,你就可以判断一个字符时汉字还是字母,是大写还是小写
还是数字
不懂可以给我发消息
根据n的大小,你就可以判断一个字符时汉字还是字母,是大写还是小写
还是数字
不懂可以给我发消息
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
MsgBox Asc("你")
MsgBox Asc("j")
英文都是255以内,汉子上千
MsgBox Asc("j")
英文都是255以内,汉子上千
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Private Sub Command1_Click()
Dim strSj As String
Dim i As Long
strSj = "你好,joker"
For i = 1 To Len(strSj)
If Asc(Mid(strSj, i, 1)) < 0 Then
Print i, "汉字"
Else
Print i, "字母"
End If
Next
End Sub
Dim strSj As String
Dim i As Long
strSj = "你好,joker"
For i = 1 To Len(strSj)
If Asc(Mid(strSj, i, 1)) < 0 Then
Print i, "汉字"
Else
Print i, "字母"
End If
Next
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用反ASCII码函数逐个判断吧,我猜的……
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询