您的位置：程序门 -> vb -> 基础类

怎么在一段代码中找出汉字？

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

怎么在一段代码中找出汉字？

发表于：2008-01-19 21:25:53 楼主

比如：
font"> 朋友们早上好!88 <img src="images/smilies/default/em06.gif" smilieid="6" border="0" alt="" /> <img src="images/smilies/default/em04.gif" smilieid="4" border="0" alt="" /> </div

怎么找出朋友们早上好？

发表于：2008-01-19 22:12:051楼得分:0

从ascii码可以判断,ascw（)函数

发表于：2008-01-19 22:15:192楼得分:0

asc也是可以的

发表于：2008-01-19 22:19:093楼得分:0

dim strtemp as string
strtemp = "我"
if strtemp > "~" then
msgbox "汉字"
elseif isnumeric（c) then
msgbox "数字"
elseif （c > = "a" and c <= "z") or （c > = "a" and c <= "z") then
msgbox "英文"
end if

发表于：2008-01-20 09:02:084楼得分:0

我会了
excel中
function getpychar（char)
for i = 1 to len（range（"a1").value)
char = range（"a1").value

tmp = 65536 + asc（mid（char, i, 1))
if tmp > = 45217 and tmp <= 62289 then
getpychar = getpychar & mid（char, i, 1)
end if
next
end function

下一篇：如何获取textbox中的字符,将其写入access数据库指定字段
上一篇：vb 控件窗体里找不到了怎么办，但它是存在的

其他资讯